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Beleska o autorima 


Tim Hartnel, urednik izda-nja, je najvise objavljivan pisac 
tekstova o racunarima na svetu. Osnivac je Nacionalnog kiuba 
korisnika ZX ; i pokretiac casopisa »ZX Kompju(ing«. U protek- 
lom periodu, ime Tima Hartnela vezano je za raznovrsne aktiv- 
nosti u svetu racunara. Medu objavljenim radovima iz ove ob- 
lasti nalaze se »Vodic za licni komjuter« (»Verdzin Buks«) i 
»Velika knjiga kompjuterskih igara« (»Fontana«). 

Klajv Giford, urednik serije i, autor, dvadesetogodisnjak 
student politickih nauka, poslovanja i prava. Saradivao je sa 
casopisom »ZX Kompjuting« i napisao je »Kako najbolje isko 
ristiti vas Dragon 32«. Svoje slobodno vreme provodi igrajuci 
golf i hokej i slusajuci muziku. 

Sju Valiker, je slobodni umetnik, ilustrator. 


Autor izrazava zahvalnost za doprinos pri pisanju ova 
knjige: Dejvidu Edvardsu, Filu Broutonu, Adamu Veringu. Ta- 
kode, autor zeli da zahvaii: Piteru, Seli, Liz i Timu na saveti- 
ma i pomoci koju su mu pruzali od pocetka rada na ovoj knjizi. 
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Predgovor jugoslovenskom izdanju 


Kucni racunari nezadrzivo ulaze i u nase domove. 
U poslednje vreme i kod nas se pojavljuju mnogi naslovi 
iz ove oblasti, ne samo ovog izdiavaca. Vecina tih knjiga 
obraduje programski jezik BASIC pomocu koga komuni- 
ciraimo sa mikrokampjutenima. Kako se prvi kontakt, 
vecine inas svih uzrasta, sa ovim malim all mocnim ma- 
sinaima usipostavlja preiko igara, to je prirodno sto se 
pojavljuju i knjige posvecene 'igrama. .<*. 

Ova knjiga sadrzi sest probranih i vrlo interesant- 
nih ligara — »avantura«. One su logickog karaktera i 
zahtevace od vas dosta strpljenja i vremena, ako zelite 
da uspesno savladate sve prepreke koje vam na putu 
stoje. 

Pre svake igre dato je neophodno uputstvo za igra- 
nje. Svaka avantura »smestena« je u zamisljene zam- 
kove, lavirinte i slicne sredine, te vas vrebaju razne 
opasnosti. Preporucujemo vam da obavezno pravite semu 
vaseg kretanja tokom igre. Tako cete uspesnije resiti sve 
proibleme i nedace na koje budete nailazili. 

Za sve ambiicioznije i vicnije program'iranju ova 
knjiga moze posluziti kao osnova za pravljenje sopstve- 
nih igara slicnog tipa. 

Redakcija 
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Predgovor englesKom izdanju 


Pred vama je prilika da se proverite, da zamenite 
vestinu »ava;ntura vanzemaljaca« za logiku, dedukciju i 
sposobnost predvidanja, da se iskljucite iz svakodnevice 
i iskusate svoju snalazljivost u SS/tuacijama razlicitim od 
uobicajemih. 

Ova knjiga je puna ligara koje ce staviti na probu 
vase umne sposobnost'i i ‘nerve. SaradPici su odabrani 
medu najboljim dizajnenima i pragramerima igara avam- 
tura. Ovakva saradnja ima za rezultat kolekciju igara 
raznovrsiniih aili uvek 'interesantnih. 

Metode prograimirainja su, takode raznorodne; pro- 
ucava'j'uci uputstva mozetel dosta isaznati o procesu pro- 
graimiranja igara avantura. Poglavlje sPrograimiraijte 
svoju ava,nturu«, na kraju knjige, bice va^m u tome od 
velike koristi. 

Konadno, madam se da cete uziva.ti u igri i resavanju 
problema koje ona donosi u istoj onoj meri u kojoj smo 
mi uzivali pisuci te programe. 

Klajv Giforci 
Esford, Midieseks 
Juni, 1984. 
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- TTT-p - 

~ ~rrrh 

Predgovor auiora 


Po mom misijenju, ligre avanture na racunarima su 
vrhums-ki izvor zabave. Dofore igre avanture mogu da iz- 
loze napor-u do krajnjih gran-ica vase sposobnosti raz- 
misljanja i logiku, kao lizazov koj-i je deo same igre. 

Medutim, lose smisljelne igre, mogu biti veoma do- 
sadlne i zamarajuce. U ovoj knjiizi, moji saradniof i ja, 
pokusali smo da vaim ponudimo najsiri iizbo>r igara — 
od igara avantura sa izrazenom likovnosow -kao sto je 
»Ta-rkus«, do avaintiu-ristickih igara kla-sicnog tri'Ier tipa, 
kao sto je »Prsten moci«. Naimeravao sam da spojim 
Klasicmi tip scenarija, kao sto su podvodne ava-n-ture 'i 
avanture bajke, sa inovim sadrzajima- ka-o sto su istra- 
zivaoje unutrasnjoisti racu-na-ra, kako izbeci kaznu u 
skol-i i setinj'u ipo jednom tipicnom'gradu. 

Pisuci programe za te igre, -koristio sam razlicite 
met ode program i ran j a, koncepc-ija i scenarija, vodeci 
uvek racuna o dve sltvari, da Iti su za-bavni ii da li pru- 
zaju dovoljan izazov na-sem du-hu. Llbeden sam da ove 
igre ispunj-avaju oba zahteva i nad'am se da cete i vi 
biti istog misljenja ovla-davsi vestinom programiranja i 
igranja. 

U vezi uputstava za prog ram iranje vazn-o- je istaci 
tehn-icku stramu. U ovoj knjizi kori-stik smo se visoko- 
kvali-tetnim stampacem, mnogo boljim od starog ZX 
stampaca. Medutim, jedaln kod se pojavljuje razlibito u 
uputstvima i na -tastatur-i Spectru-ma. Na primer, dirki 
»3« n-a tasta-turi Spectru-ma odgova-ra mali trougao u 
uiputstvu. 

Klajv Giford 
Esford, Midleseks 
Juni, 1984. 
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Kvar! 


I grate vasu najnoviju elektronsku ligru i upravo ste 
pred postizanjem velikog rezuitata kada . . . KVAR! Vas 
racunar je pretrpeo raspad sistema i vi ga morate po- 
praviiti. Jedi'na sainsa za vas bi bila da se uz pomoc laser- 
skog zraka smanjiite na meru koja bi vam pmogucila 
ulazak u unutrasnjost rabumara u cilju razreseWja prob- 
lema. Vase poznavanje tehnike i spoisobno^t rasudivanja 
bice is'kusame do maksimuima pril.ikom resdvanja ove 
kratke igre koja ce zaokupiti svu vasu paznju. 

Ova igra vas upucuje, kako koriscenjem sasvim 
razlicitog scemarija, mozete stvoriti sasvim originalnu i 
uzbudljivu avanturu. Pokusajte da sami smislite neka 
nova scenarija ili pogledajte poglavlje pri kraju knjige 
o pisanju programa za sopstvene avantiure. 
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10XBQRDER 0|INK 7sPAPER 0sCLS :RES 
TORE 

20 PRINT AT 2,11s FLASH Is" K V A 
ft " 

30 FOR n*0 TO 100 

40 POKE 22527+RND*704,RND*127 

50 BEEP ,005,RND*50 

60 NEXT n 

80 PRINT AT 10,.0s" Racunar ti se P 
okvario i treba da §a popravls !" 

90 PRINT AT 17,8s" Igru sastavio " 
100 PRINT AT 18,8s" Dave Edwards " 
110 DIM k$(29,64)s DIM a(29,6): DIM 
o*(14,2.3g)S DIM d(14,2)s DIM i$(5, 
2,32): DIM i(5): DIM W$(19,3) 

130 LET b=0; LET z-ls LET ta=0S LET 
ps0s LET c s 0: LET in*is LET s=0! LE 
T 1i“05 LET rm=ls LET ef=""S LET f$= 
""s LET a*=0 

150 REM ucitavanje pods.taka 

170 FOR n-1 TO 29: READ k$(n); NEXT 

190 FOR n=i TO 29s READ a(n,1),a(n, 

2), a (n,3), a(n, 4), a(n, 5), a(n.,6) s NEXT 
n 

210 FOR n-1 TO 13: READ w$(n): NEXT 

230 FOR n=i TO 14: READ o$(n,i),o$( 

n,2),o(n.1),o(n,2): NEXT n 
250 LET rm=l 
270 CLS 
290 REM ulaz 

310 IF s-0 THEN LET e$= "Racunar 
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.je ukljucen," 

330 IF . 1i=0 AND rm>5 THEN PRINT "M 
rak. -is LET e$= y ": LET f$='■'" 

350 IF Ii=I OR 1i-@ AND rm<5 THEN 
PRINT " TI s1";k$(rm) 

370 PRINT e$; PRINT it 
390 LET e$="": LET *$="" 

410 PRINT " Vidiss 11 1 

430 FOR n=i TO 14; IF atn, l>'*Jrn THE 

N IF 3=1 THEN PRINT " "+a$ 

(n, 15 

431 IF oTn. l)*»rm AND 3=0 THEN PR IN 
T D$(n.1): LET 3=1 

432 NEXT n 

450 IF s.=0 THEN PRINT "nista vazno 

470 LET 3=0: PRINT : PRINT 
490 REM entry point 2 
510 LET a=0 

530 INPUT " Sta dalje "J z$ 

550 REM disection 
570 LET x$=" " 

575 IF LEN z$<*2 THEN LET z$=zS+" 

580 FOR x-i TO LEN z$-LEN xf+1: IF 
x*«z$<x TO x+LEN x$~l) THEN GO TO 5 
90 

585 NEXT x: LET x*0 

590 LET a$=z$( TO x): LET b$=z$(x+i 

TO 5 

595 LET xa=3: LET xb=32: IF LEN a$< 
=3 THEN LET xa=LEN a.$ 

600 IF LEN b$ AND 3 THEN LET xb=LE 
N b$. 

605 LET c$*a*< TO xa.) : LET d$=b$C 
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TO xb) 

610 FOR n—1 TO 19 

630 IF c$=w$(n) THEM GO TO 710 

650 .IF d$=w*<n) THEN GO TO 710 

670 NEXT n 

690 GO TO 730 

710 IF n-1 THEN GO SUB 310! LET n= 

0 

711 IF n«g THEM GO SUB 830! LET n* 

0 

712 IF n*3 THEN GO SUB 850! LET n* 

0 

713 IF n-4 THEN GO SUB 870! LET n« 

0 

714 IF n*5 THEN GO SUB 890! LET n* 

0 

713 IF n-6 THEM GO SUB 910: LET n= 

0 

716 IF n-7 THEN GO SUB 930! LET n- 

0 

717 IF n=8 THEN GO SUB 930: LET n= 

0 

^713 IF n=9 THEN GO SUB 990! LET n= 

"719 IF n-10 THEN GO SUB 1030; LET 
n=0 

720 IF n~l1 THEN GO SUB 1070: LET 
n=0 

721 IF n-12 THEN GO SUE 1090: LET 
n=0 

722 IF n=13 THEN GO SUB 1130: LET 
n=0 

723 IF n-14 THEN GO SUB 1230: LET 
n-0 

724 IF n-15 THEN GO SUB 1250: LET 
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n=0 

785 IF h*i© THEN GO SUB 1350; LET 

rj*0 

726 IF n=17 THEN GO SUB 1450; LET 
n-0 

727 IF n=13 THEN GO SUB 1530; LET 
n=0 

728 LET csi 

730 IF c=0 AND f!Ti>4 THEN PRINT " I 
gnenada te pagedio elektran u prolaz 
u !" i GO TO 3090 

750 IF c<>0 THEN LET c=0; GO TO 77 

0 

755 IF c=0 THEN GO SUB 3110: IF c= 
1 THEN GO TO 770 

760 IF c$“"" THEN PRINT * Molim pg 
navi recenicu !" 

765 IF c$<>"" THEN PRINT " Ne znarr, 
kakc da ";b$: PRINT * budalo!!" 

766 IF c$="" AND d$="" THEN PRINT 
" Molim ponovi recenicu!" 

770 PAUSE 1000 

790 IF q=0 THEN ’GO TO 490 

795 IF q=l THEN LET a~l; GO TO 270 

300 STOP 

810 IF aCrm, 1)00 THEN LET rm=a(rff, 
1); PRINT " Q.K. "s LET q=l: RETURN 

315 LET rm*rm: PRINT " Q.K. "? LET 
q-i; RETURN 

830 IF a(rm,2)<>0 THEN LET rff,=a(rrn 
*2>l PRINT " 0. K. LET q~ls RETURN 

835 LET rm=rm: PRINT " Q.K, "s LET 
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q»l» RETURN 

850 IF a<rm,35<>0 THEN LET rm*a(rm 
,3): PRINT * O.K. "? LET q*i: RETURN 

855 LET rinarm? PRINT " O.K. "? LET 
q-i! RETURN 

870 IF aCrm, 4)00 THEN LET rrn-a (rm 
,4)j PRINT " O.K. 11 i LET q*l! RETURN 

875 LET rm s rm! PRINT " O.K, "? LET 
a»l: RETURN 

890 IF a (rm 1 5)00 THEN LET rm*a(rm 
..5)? PRINT "O.K. "5 LET q=i; RETURN 

895 LET rm-rm: PRINT " O.K. LET 
q-l• RETURN 

910 IF a(rm,6)<>0 THEN LET rm=a(rm 
.6); PRINT " O.K. "i LET q*i; RETURN 

915 LET rma f ms PRINT " O.K. LET 
q=l: RETURN 

830 IF in>5 THEN PRINT FLASH 1:" 
Ne mozes vise da aoneses !": RETURN 

950 FOR n~l TO 14; IF o$(n..2, TO 3) 
AND rm=o(n.l) THEN LET.i*<in,1) 
s o$ (n, 1) ; LET if (in.,2) =o$ (n, H) s LET 
i(in)“ 0 (n,2)? GO TO 970 

955 IF of (n,2, TO 3}=d$ AND rrnOo(n 
A) THEN INK 4; PRINT FLASH 1?" To 

ovde ns vidis !"; INK 7*. RETURN 

960 NEXT n; INK 6; GO SUB 952: IF z 
<>1 THEN PRINT FLASH 1;" Sta je 
bf:" ?": 

RETURN 
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961 RETURN 

962 IF d$ a " 2 ic" OR d$= w atp" OR d$=" 
rorn" OR d$-."ram H THEN PRINT " To ne 

mozes da uzmes !": LET 2=1: RETURN 
970 PRINT " O.K, LET o(n>l)«-2i 
LET ln=in+li IF d$="olo" THEN LET 1 
i=l: LET sw=l 
975 RETURN 

990 FOR n=l TO in: IF d$=i$(n, 2, TO 
3) THEN LET o(i(n),1)9rn: PRINT " 
O.K. "s 30 TO 1010 '** • 

995 NEXT Hi PRINT * Ali ti nernas ": 
bfj" !"! RETURN 

1010 FOR n=n TO in-2: LET i*(n,l)«i$ 
(n+i,1): LET i$«n,2?=i$(n+l.2): LET 
i <n)~i (n+i 5 : NEXT ti: LET i$(in~l.l)= 
""; LET i$(in-l,2)="": LET i<in-1>-0 
; LET in=in-i: RETURN 
1030 IF d$="otp" AMD rm=29 OR d$="zi 
C" AND rm=9 THEN *30 TO 1050 
1035 FOR n=i TO 14: IF d$=o$(n,2. TO 
35 THEN PRINT " To je samo ":o$(n, 
i): RETURN 

1040 NEXT n: PRINT " Me vidis nista 
siicno da. ispitas !": RETURN 
1050 IF d$="otp" THEN PRINT " Jedan 
krai mu se olabavio !": RETURN 
1055 IF d$= J ' 2 ic' ? THEN PRINT " Jedan 
kraj is orekinut 1 ": RETURN 
1070 LET q-1: PRINT " O.K, ": RETURN 

1090 FOR n=l TO in; IF j$(n.2. TO 3) 

="kfp" THEN GO TO 1110 

1095 NEXT n; PRINT " Cime da cistim- 
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, budalo ?": RETURN 
1110 IF rrn-27 AND d$*"kOl" THEN PR I 
NT " Cist is kales. Iz njega zraci crv 
eni zar."; LET ta=ta.+ l; RETURN 
1115 PRINT " Cistis "jb*.:" PRI 

NT " Nista ss ns desava.": RETURN 
1130 IF rmOi THEN PRINT FLASH 1?" 
Na cernu da kg earn ? ": RETURN 
1150 IF d$<>"bun" AND s<>0 THEN PRI 
NT " Ti kucas "}bPRINT " Ra 
curiar ne ekranu prikazu.je 'SINTAKSNA 
GRESKA,"} RETURN 

1170 IF d$~"run" AND s™0 AND ia<>5 T 
HEN PRINT " Racunar prikazu.je na ek 
rang '"is PRINT FLASH Ij" ROM/RAM 
GRESKA PRINT FLASH 0.s"" ! : RETUR 
N 

1130 IF d$ s "run" AND s=0 AND ta-5 TH 
EM PRINT " Racunar je sada isprayan 
, Sada mozes da nastavis igru 
•JET NET BILLY!!"! STOP 
1210 PRINT " Ti kucas "ib$:".,"i PRI 
NT " Racunar na ekranu pokazuje ' SI 
NTAKSNA GRESKA U KOMANDI!"i RETURN 
1230 PRINT " Vreme prolazi ,,,"! RET 
URN 

1250 IF rrri-29 AND o<l, 1)~rrn OR rm=9 
AND o(H. l)s=rm THEN GO TO 1270 
1255 PRINT " Sta da zalemim RETU 
RN 

1270 FOR n-1 TO in-1; IF i$(n,2, TO 

3 5 ="ka1" THEN LET a-i 

1275 IF i$Cn.2. TO 3>*"lem" THEN LE 

T b-1 i 

1280 NEXT n 


16 






KVAR 


1285 IF a-0 DR b-0 THEN PRINT " -Jos 
ne mazes da lemis !": RETURN 
1290 IF a=l AND b=l AND d$="atp" THE 
M PRINT " Lemis atpornik": LET ta-t 
s.+ l! RETURN 

1295 IF a-1 AND b-i AND d$-"zit" THE 
N PRINT " Lemis zicu,"s LET ta=ta+l 
: RETURN 

1310 PRINT " Job ne mazes da lemis ! 
i RETURN 

1350 CLS ! PRINT AT 0(10)* gprsak" 
1370 PRINT : PRINT 
1390 FDR n*l TO in-1 s IF i#(n,S, TO 
3)0"" THEN LET as is PRINT " *jl$< 

n. 1) 

1395 NEXT ns IF a=0 THEN PRINT " Ne 
mas nista kad sebe !"s RETURN 
1410 PRINT : PRINT 
1430 RETURN 

1450 IF d$="ram" AND rrr,=25 DR d$="ra 
m" AND rm=22 THEN GO TO 1490 
1470 PRINT " Sta da eopravim RET 
URN 

1490 FOR n=i TO in~i; IF i$(n,2. TO 
3)0"kas" THEN NEXT n: PRINT " Tq n 
e maze da se popravi !"{ RETURN 
1495 PRINT " Popravijas "sdS;" "s LE 
T ta=ta+l: IF rm=25 THEN LET 0(12,1 
)=-2: RETURN 

1500 IF rm*22 THEN LET a(13,1)*-is 
RETURN 

1530 IF rrn=l AND d$="ukl" THEN LET 
s=0: PRINT " 0.K,": RETURN 
1535 IF d$="isk" THEN LET s=li PR IN 
T " 0.K,"j RETURN 
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1540 PRINT FLASH li" Koji prekidac 
RETURN 

1550 REM DATA ( lokacije .5 
157@ DATA " van racunara" 

1590 DATA " u zracima za srnanj ivanje 

1610 DATA " na ulazno-izlaznom prikl 
jutku CENTRONICS"' 

1630 DATA " na magistral! podataka" 
1650 DATA ” na logickom ulazu" 

1670 DATA " na logickom ulazu" 

1690 DATA " na magistrali podataka" 
1710 DATA " u sklopu za ukljucenj/is 
kl.i ucenj e" 

1730 DATA " na vezi sa tastaturorn" 
1750 DATA " kod video-modulatora" 
1770 DATA " na magistral! podataka” 
1790 DATA " ispod glavnog procesora" 
1810 DATA " okruzen glvnim procesoro 
m" 

1830 DATA " okruzen glvnim procesoro 
m" 

1350 DATA " okruzen glvnim procesoro 
m" 

1870 DATA "okruzen glvnim procesoro 
m" 

1890 DATA " izmedju dva memorljska c 
ipa" 

1910 DATA " na magistrali podataka" 
1930 DATA " na magistrali podataka" 
1950 DATA " kod konektora za RAM-mem 
ori.ju" 

1970 DATA ’■ kod konektora za RAM-mem 
ori.ju" 
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1930 DATA " u RAM-memoriji" 

2010 DATA n u RAM-memorij i" 

2030 DATA " u RAM-memoriji" 

2050 DATA " y RAM-Memor i.j 1'' 

2070 DATA " u RAM-memoriji" 

2090 DATA " na zsprljanom konektoru" 
2110 DATA " iznad prikl.iucka za kase 
ty ” 

2130 DATA " u gomili otpornika" 

2150 REM tm PQDACI Cizlazi) 

2170 DATA 2,0.0,0.0,0 
2190 DATA 3,1,1.1.0.0 
2210 DATA 4,2,1,1,0,0 
2230 DATA 7,3,S,5,©,0 
2250 DATA S.9.4,10.0.0 
2270 DATA 23.0=39,4.0.0 
2290 DATA 11.4.6.8,0,0 
2310 DATA 0.5.7.27.0.0 
2330 DATA 5.0.0,0,0,0 
2350 DATA 27,0.5.0.0,0 
2370 DATA 12,7,0.0,0,0 
2390 DATA 0.11.0.0.14,0 
2410 DATA 0.14,15.0.0.0 
2430 DATA 13.0,16.0.0.12 
2450 DATA 0.16.0.13.0.0 
2470 DATA 15,0,17,14.0.0 
2490 DATA 13.0.0,16.0.0 
2510 DATA 0,17.19.0.0,0 
2530 DATA 0.0,20.13.0,0 
2550 DATA 21.0,0.19,0.0 
2570 DATA 22.20.0.0.0.0 
2530 DATA 0.21.0.23,0.0 
2610 DATA 26,24,22.25.0.0 
2630 DATA 23.0.0.0.0,0 
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2650>DATA 0.0.23.0,9,0 
2679 DATA 9.23,0,0.0.4 
2699 DATA 0,10.0.0,0.0 
2710 DATA 0.6,9,0.0,0 
2730 DATA 0,0,0,6,0,0 
2759 REM **** PQDACI KOMANDE 
2770 DATA "sev","jug","1st","zap"»"g 
or","do1","uzm","pon","ost","isp","o 
tp", "els", "otk", "cek.", "zsl", "lis", "p 
OP","pre" 

2790 REM UU PQDACI - PREDMETI 

2810 DATA "Qtpornik", '"',29,1 

2820 DATA "Zicu","",9,2 

2830 DATA "Lemilicu", "lam", 11,3 

2840 DATA "Olovku za ekran","olo",4, 

4 

2850 DATA "Ks.setu zs pronalazenje kv 

arova","kas",5,5 

2869 DATA "Kalaj ", "kal'M 1.6 

2370 DATA "Krpu","krp",3,7 

2880 DATA "Rom Cip","fom",12,8 

2899 DATA "Taktni kvarc","kva",26,9 

2909 DATA "Kondenzatof","kon".20,10 

2910 DATA "Staru triodu","tfi",29,11 

2929 DATA "Kvar ROM-a","",25,12 

2930 DATA "Kvar RAM-a","",22,13 
2940 DATA "Ulazno/izlazni cip '6821' 
","Cip",10,14 

3990 INPUT " Hoces li ponovo "ia$i I 
F a$0"da" AND a$<>"DA" THEN GO TQ 
9000 

3995 RUN 
3110 RETURN 

9000 BORDER 7 i PAPER 7: INK 0: CLS 
! PRINT AT 10,10,1 "KRAJ IGRE" 
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Lovac na bisere 


U ovoj avantun stavljate se u ulogu skrommog ri- 
bara, koji cuvsi neke price o biserima u juznoj uvai'i, 
zuri da isplovi svojiim camcem u potrazi za blagom. 
Treba da sakupite pet O'Striga da bi blago stekli, all du- 
bine kriju mnoge opasmosti, od pirana db algii. 

Morate izvaditi svaku ostrigu ponaosob i plivati 
natrag do camca; obzirom da njihova veljdiina dbzvo- 
Ijava da ponesete samo jednu pri svakoim pokusaju. Na 
pocetku aivanture, vase zalihe kiseonika siu u vrednosti 
90, i postaiju sve manje sto duze plivate i izlazete se ni- 
ziciima. Medutrm, mozda cete biti srecni da naiidete na 
neiskoriscenu bocu kiseonika koja se nalazi na dnu 
mora. 

Igra se odlikuje planiranim sistemom pokreta. Ovaj 
tip igre se obicno laikse resava iscrtavanjem plaina igre 
na papiru ii pomeranjem u okvinu datih tacaka. Ja sam 
malo koimplikovao ignu time sto sam postavio vremen- 
sko ogramicenje (90 pokreta), i sto nisam dao stan- 
dardni raster Iinija na monitoru. Umesto klais'icnog kvad- 
ratnog forimatav moj raster se neznatno razlikuje. Njega 
je i daije imogude iscrtaiti i ja vam savetujem da to uci- 
nite, jer je to najbolji put za resavanje avanture, iako ce 
biti potrebno vise vremena i koncentracije. 

2elim vam srecu u traganju za d'zinovskim ostri- 
gama. 
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\Ca f?eM %%% lovae na bisere W 
2® -30 SUB 500® 

3® LET 1=3; LET s=9® 

4® LET tre-0 

80 PAPER 1; INK 7; BORDER 5 
10® REM ttt akciona igra * 

11® CLS 

123 PRINT ; PRINT " BISE 

RI 

124 PRINT • PRINT ; PRINT ; PRINT " 
Vi ste 

13® IF 1<17 THEN PRINT "na povrsin 
i okeana" 

132 IF 1<33 AND I>16 THEN PRINT "n 
ekoliko me tar a. dublje" 

134 IF 1<49 AND 1>32 THEN PRINT "u 
mracnin dubinama" 

136 IF 1>48 THEN PRINT "na dnu oke 
ana" 

140 PRINT ! PRINT "Vase 23.1 ihe su " 
!ss" pokreta" 

150 PRINT ; PRINT "Vidite "i 
17@ GO TO 1000+a(l)*50 
18® PRINT * INPUT "Kpjim pravcem ze 
1 ite da krenete? (s-lever, ,i -jug, i-i$t 
ok.z-zapad) ">m$ 

190 IF mf<>"s" AMD " AND m$<> 

"i" AND rf,$<>"z" AND m$<>"d" AND m$<> 
"q" then PRINT "Pogresan izbor"; LE 
T~s=s-l! GO TO 180 
200 IF m$="s" AND 1>8 THEN LET 1=1 
-3 

21® IF m$="j" AND 1<56 THEN LET 1= 
1+8 
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220 IF AND l>i THEM LET 1=1 

-1 

23® IF "z" AND I<64 THEN LET 1= 
1 + 1 

240 LET s=s-l: IF s<=0 THEN GO TO 
2300 ' 

300 GO TO 90 

340 PRINT AT 8,15:" " 

1000 R E M t % % c i s tins, % % t 

1010 PRINT "cistinu - nicegjia vldik 

u" * • 

1020 GO TO 180 

1050 REM ### oktopod t%% 

1060 PRINT FLASH l:"oktopoda !!! n 

1070 LET k=13 

1080 GO SUB 2000 

1090 GO TO 180 

1100 REM ### a.iku la W 

1110 PRINT FLASH 0;"prozdrljivu ajk 

u 1 u" 

1120 LET k=32 
1130 GO SUB 2000 
1140 GO TO 180 

1150 REM %%% dzinovsku sipu %%% 

1160 PRINT "dzinovsku sipu" 

1170 LET k*24 
1180 GO SUB 2000 
1190 GO TO 180 
1200 REM %%% alge *** 

1210 PAPER 4i PRINT "A L G E" 

1215 PAPER 1 

1216 PAUSE 30 

1220 PRINT ...."Uspeli ste da se osl 
obodite, ali ste utrosili 5 pokreta" 
: LET s=s-5 
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1230 PAUSE 150 
1240 GO TO 130 
1250 REM U* dstrige *** 

1260 PRINT FLASH i;"0 S T R I G E" 
1270 LET tre=tre+l: LET ad) =0 
1280 BEEP ,5,20: BEEP ,5.35 
1280 GO TO 180 

1300 REM ##* star! kovceg **# 

1310 PRINT "stari kovceg": PRINT "Da 
li zelite da ga otvorite(d/n5?" 

1320 INPUT v$: IF v$<>"n" AND RND>,6 
6 THEN PRINT ,, "Uzasno cudoviste iz 
lazi napolje i zeli da vas unisti... 

PAUSE 150s GO TO 2300 
1330 IF yf<>"n" THEN PRINT ,,"Prona 
sli ste yeliko blago,.. Vracate se u 
camac kao bogat covek'd LET tre=5 
1340 GO TO 180 
1350 REM **# Pirans *** 

1360 PRINT FLASH 1:"PIRANE!!!" 

1370 LET k=14 
1380 GO SUB 2000 
1390 GO TO 180 

1400 REM punjen.je boce sa kiseon 
ikom %%% 

1410 PRINT "bocu sa kiseonikom," 

1420 PRINT ,,"Boca sa kiseonikom va 
m dale snagu'd LET s=s+15: LET ad)- 
0 

1430 BEEP 1.30 
1440 GO TO 180 
1450 REM #*# ribe *#* 

1460 PRINT "jato riba..," 

1470 PAUSE 100 

1480 PRINT "Ne brinite one su bezaz 
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1490 GO TO ISO 

1500 REM Ms carnac *** 

1510 PRINT "V-3.5 camac.* 

1520 PRINT "Smestate kovceg s blagom 
u camac" 

1530 IF tre>=5 THEN GO TO 2300 
1540 PRINT "Potrebno vam je jos -|5- 
tre:" ostriga" 

1550 GO TO 180 

2000 REM *## borba Ut ■ 

2005 LET c = INT (RND*101+1 
2010 PRINT : PRINT "Plivate u suprot 
nom oravcu Cp> i1i se barite (b)?" 
2012 INPUT a$: IF s.$<>"p" AND a$<>"b 
" THEN PRINT "Ns sal its se! ! IN GO 
TO 2012 

2015 IF a$="p" AND RND>.5 THEN GO T 

n 3000 

2017 TF a$="b" THEN GO TO 2050 
2020 IF a$="p" THEN PRINT ,,"Potros 
ili ste "jcj" pokreta": LET s=s-c: I 
F a(1-1)=0 AMD 1>1 THEN LET 1=1-1: 
RETURN 

2022 IF a(1+1)=0 AND 1<64 THEN LET 
1=1+1: RETURN 

2024 IF a(1+8)=0 AMD 1<56 THEN LET 
1=1+8: RETURN 

2026 IF a(1-8)=0 AND 1>8 THEN LET 1 

=1-8: RETURN 

2028 LET a(1)=0: RETURN 

2050 PAPER 2: CLS 

2060 PRINT " Borba je pocela.,.." 
2070 REM pe+l.ia koja definise b 
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orbu %t% 

2090 IF RND>.66 THEN PRINT " tU P 
ovredjeni ste. . ! ! ! ###": LET s-s-i 
2100 IF RND<.34 THEN PRINT " . , , I 

zveli ste debar napad ... LET k=k 
-<INT <RND*45+1) 

2110 PRINT Protivnik:":kj" 

Vi:"; s 

2120 IF s<=0 THEN GO TO 3000 
2130 IF k<=0 THEM FOR t=l TO 10: BO 
RDER 3: PAUSE 30: EORDER 5: PAUSE 30 
: NEXT t: PRINT Savladali st 

e protivnika LET a(l)-0: RE 

TURN 

2140 PRINT : PRINT : GO TO 2090 
2300 REM ### pobeda ### 

2320 FOR t=0 TO 7: BORDER t: PAPER t 

: BEEP ,6,t*5; NEXT t 

2330 INK 1: PRINT AT 10.. 10; FLASH 1: 

BRIGHT 1:"Begati steI" 

2350 BEEP 3.40 

2360 FOR +=i TO 200: PRINT AT INT (R 
ND'tB) +12.1 NT (RND*30)+1? INK RND*7j" 

2365 PRINT AT INT (RND#8)+1.INT (RND 
#30)+1: INK RND#7:" 1 " 

2370 BEEP .009.RND#55: NEXT t 
2900 STOP 

3000 REM Poraz W- 

3005 PAPER 0: INK 7: BORDER 1: CLS 

3030 OVER 0: INVERSE 1 

3040 PRINT AT 8.15:" " 

3050 PRINT AT 9.15s" " 

3060 PRINT AT 10.12:" R.I.P " 

3070 PRINT AT 11.15:"" 
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3080 PRINT AT 12.15:" " 

3090 PRINT AT 13.15:" " 

3092 PRINT AT 14.15:" " 

3094 PRINT AT 15.15:" " 

3100 PRINT AT 16.13:" 

3110 PRINT AT 17.11:" 

3120 INVERSE 0: OVER 1 
3150 PRINT AT 2,10:"PORAZENI STE! ! " 
3160 PRINT "Pohlepa. 2 a biserima dove 
la vas je do tragicnog kraja!!!" 
3190 BEEP 1,0: BEEP 1,4: BEEP-. 2,. 0 
3900 STOP 

5000 REM *** podaoi ### 

5010 RESTORE 
5020 DIM a(65) 

5030 FOR x=2 TO 55: READ a(x>: NEXT 

5050 DATA 1 , 0 .0.4. 0 . 2 .0,9.0,4. 0 . 0 .4. 

0 . 2.10 

5060 DATA 7. 0 . 0 ,4. 0 , 0 .7.0.3.9.0.0.0, 
7,0.7 

5070 DATA 0,3,0,5,1,0,2,0.8,0, 0,9,2, 
0,3.0 

50 P .0 DATA 5.0.8.5.0.4.5.0,0.4.6.0.5. 
0.0.5 

6000 REM %%% naslov %U 
6010 INK 7; PAPER 1: CLS 
6020 PRINT AT 2.5:"L 0 V A C N A B 
I S E R E" 

6040 FOR t“l TO' 20: CIRCLE 125.30. t: 
NEXT t 

5050 BEEP 2.20: BEEP 2.30: BEEP 2.25 
6200 PAUSE 200 
5210 BEEP 1.10 


5400 RETURN 
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Prsten moci 


Ova slozena igra je rezultat intenzivnog rada Dejvida 
Edvardsa, programera iz Londona. Vi ste smesteni u mi- 
toloski svet u kome su snalazljivost i hrabrost presudne 
osobine za postizanje cilja. U potrazi ste za carobnim 
prstenom modi, jer onaj koji poseduje prsten ima i vlast 
nad podzemmim svetom. Stigli ste u zlokobni zamak, gde 
se pretpostaiv'lja da se prsten nalazi. Mo.rate prikupiti 
razlicite kljuceve, betz kojih bi vase dalje putovanje 
kroz zamak bi(o spreceno. 

Ova avantura je izuzetno naporna. Sadrzi manje 
zagonetki za resavanje negio igra »Svakiidasnja avantura«, 
aii zato postupoi u igri moraju biti pneduzeti sa izuzet- 
nom paznjom, da bi se izbeglo nekoliiko velikih lavirinata 
iiz kojih je tesko nadi izlaz. 

Pre programiranja komandi ogranicite >ih na neko- 
liko reci. Racunar mozda nede pnihvatiti vasu komandu 
aii ce zato prihvatiti nesto drugacij'u zapovest. Na pri¬ 
mer, radunar mozda nede prihvatiti komandu »NADI 
PLATINiSKI KLJUC« (GET THE PLATINUM KEY), aii ce 
prihvatiti »NADI PLATI)NSKI« (GET PLATINUM), jer ima 
visd kljudeva koje treba pr'onaci. Prosuduijte sami. Bilo 
bi ikorisino da zapisujete svalki po.kret koji ucinite 'u igri, 
kako bi ih kasnije proverili. Verujte, ova igra ne samo 
sto iziskuje nekoliko sati za resavanje vec predstavlja 
lizazov ne ma:nji od onih koji nude komercija'I'ni proiz- 
vodaci so'ftvera. 

Zbog obimmosti, igra ima dva dela. Procedura je 
sledeca: 

1) Kucajte program 1. 

2) Memorisite program 1 na traci koristeci format, 
SAVE »RING« LINE 1. 

3) Kucajte program 2. 

4) Memorisite program 2 na traci odmah posle 
programa 1. 

5) RUN program 2. 
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Kada jedinom sve bude stavljeno na traku, sledeci 
put kada zeliite da koristite program, samo kucajte 
LOAD'''' i komplebna igira avanbura ce se ubaciti auto- 
rnstski. 

Ako vaim se na kraju igre postavi pitanje da li opet 
zelite da igrate, a to zelite, o-nda kucajte 'Y' i ponovo 
ubacite drugi program. 

Jedna napomena: budluoi da je ova igra veoma slo- 
zena, dacu vaim jedan pokazatelj. Za prvi lavirint od ko- 
risti ce bit;, 'NWNEEESS'. 
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5>REM U THE RING OF POWER U 

10 DIM I*C9,2,325} DIM I(9,25: DIM 
D (5) 

14 LET F$="" i LET QW«0 

15 DIM D$(8.S45; DIM K(S) 

IS BORDER 41 PAPER 1: INK 7 

17 LOAD "1" DATA P$(5i LOAD "2" DA 
TA P(5 s LOAD "3" DATA Of(): LOAD "4" 
DATA 0(5s LOAD "5" DATA W$(5 
190 PAPER 1: INK 7s BORDER 1 
200 CLS 

210 FOR N=25 TO 155 STEP 5 
220 CIRCLE N.N,5 
225 CIRCLE 255-N,N,5 
230 NEXT N 

250 PRINT AT 21.9s FLASH Is" PRSTEN 
HOC I " 

2S0 FOR N-0 TO 1000s NEXT N 
530 LET RM-ls LET SA=0: LET SB=0: L 
ET IN-Is LET D=0: LET Q=1000: LET E$ 
LET SR=is LET A$=""s LET W-0: L 
ET Z=555: LET D=0: LET R=0: LET AL=0 
: LET CE-0: LET EW=0 
540 LET D$(15=" TOGA OVDE NEMA !": 
LET Q$ (2)ME MOZETE ICI NA TU STAR 
MU !"s LET D$(35A STA JE TO "s LE 
T D$(45TO NE MOZETE UZETI !"s LET 
D$(5)=" TO NEMAS !"; LET Df(55=" NE 
LUPATE GLUPOSTI !"s LET D$(75=" REC 
EMO-UCINJENO !" 

550 IF RM=S AND SR=1 THEN LET A$=" 
CIM STE USLI RESETKA SE SPU 

ST I LA ZA VAMA !"s LET SR-SR+1 
555 IF RM-1S AND 5R=2 THEN LET A$= 
" DOK ULAZITE CUJETE GLAS KOJI K 
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AZE ' BRAVO,. DECKQ, BRAVQ LET S 
R=SR+i 

56® IF RM=40 AND D=0 THEN LET 
QGRQMAN, BESAN PAS STOJI U UGLU" 

570 IF RM-43 AND R=0 THEN LET E$=" 
QGRQMAN ZEC STOJI I3PRED VRATA" 

580 IF RM=i7 AND D < 1) =<d THEN LET E 
ISTQCNI IZLAZ ZATVARAJU VELIKA 
VRATA" 

590 IF RM-29 AND D(2)=0 THEN LET E 
SEVERNI IZLAZ ZATVARAJU VELIKA 
VRATA" 

500 IF RM-37 AND D(3)=0 THEN LET E 
ISTQCNI IZLAZ ZATVARAJU CVRSTA 
CELICNA VRATA" 

610 IF RM-40 AND D(4)=0 THEN LET E 
$*" SEVERNI IZLAZ ZATVARAJU CVRSTA 
CELICNA VRATA" 

620 IF RM-69 AND D(5)=0 THEN LET E 
$=" PRQLAZ DO PRSTENA MOCI 
ZATVARAJU TESKA DRVENA VRATA" 

630 IF RM=2i AMD AL*0 THEN LET E$= 
" NA OLTARU LEZI TELO UBIJENE DE 
VOJKE" 

640 IF RM~21 AND AL*1 THEN LET E$= 
" NA PQDU VIDITE LES NEKE DEVOJKE" 
650 CLS 

660 FOR N*i TO 40i IF Q(N.i)-RM THE 
N LET F$=F$+Q$(N,1) 

661 NEXT N 

670 IF CE=0 AND RM>44 AND RM<60 THE 
M PRINT " QVDE JE TAKO MRACNO ! 
"! PRINT i LET F$=""! LET E$-""i LET 
A$=""! GO TQ 690 
680 IF CEO0 THEN GO TQ 702 
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690>IF RM>44AND RM<58THEN BEEP . 1, 
1iLET EW-EW+i 

691 IF RM<44 OR RM>60 THEN GO TO 7 
02 

692 IF RM>58 AMD RM<60 THEN BEEP , 
1.501 LET EW=EW+i 

693 IF EW-16 THEN GO TO 700 

694 IF EWOIS AND CEO! THEN GO TO 
300 

695 IF EU<>!6 AND CE*1 THEN GO TO 
702 

700 PRINT IZNENADA VAS JE NAPAO D 
ZINQVSKI PAUK. MRTVI STE !": PRINT 

: PRINT " ZELITE LI DA JOS JEDNOM OK 
USATE SRECU ? (D/N) M ! INPUT Z$; IF 

Z$<>"D" THEN STOP 

701 IF Z$="D" THEN RUN 

702 FOR N=1 TO 192; IF P$(RM,N TO N 
)=" " THEN LET QW*QW+1 

703 IF P$(RM,N TO N)<>" " THEN LET 
QW-0 

704 IF 00-32 THEN GO TO 710 

705 NEXT N 

706 LET N=192 

710 IF RM=34 THEN LET N*i92 

711 PRINT AT 0,0j" NALAZITE SE i"'P 
*<RM, TO N) 

720 PRINT Af; PRINT E$: LET A$=""; 
LET E$-"" 

730 PRINT I PRINT " VIDITE..." 

735 IF F$«"" THEN PRINT " PA I NE 
VIDITE NESTO NAROCITO"; GO TO 750 
740 PRINT F$ 

745 LET F$=*"" 

750 PRINT " IZLAZI SU NA " 
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PRSTEN 

MO CI 



T±t±n 

1 752 

>IF 

~i 

' P (RM, 1 ) <>( 

5THEN 

J_ 

PRINT " 

SEVE 

R" ; 

753 

IF 

P (RM, 2)00 

THEN 

PRINT ■ 

" JUG 

754 

IF 

P(RM,3)<>0 

THEN 

PRINT 1 

" 1ST 

OK" j 

755 

IF 

P(RM,4) < >0 

THEN 

PRINT ■ 

" ZAP 

AD"! 

756 

IF 

P(RM,5)<>0 

THEN 

PRINT 

" GOR 

E"s 

757 

IF 

P(RM,6)<>0 

THEN 

PRINT, 

" DDL 


F " j 

”758 PRINT 

760 IF RM-3 OR RM-26 THEN FOR N~0 
TQ 500! NEXT Ns PRINT 2ELITE LI DA 
JOS JEDNQM OKUSATE SRECU ? (D/N), 

"! INPUT Z$: IF Z$*"D" THEN RUN 
762 IF RM-3 OR RM=H6 THEN IF Z$="N 
" THEN STOP ' 

300 INPUT " A STA SAD ? LINE C$ 

305 LET X$=" " 

306 IF LEN C$< 3 2 THEN LET C$ 3 C$+" 

810 FOR X s * 1 TO LEM C$-LEN X*+i: IF 
X$-C$(X TO X+LEN X$-l) THEN GO TO 3 
30 

320 NEXT X! LET X=0: GO TO 830 

830 LET T$ 3 C$( TO X) I LET q$=C$0<+i 
TO > 

831 LET XA*3i LET XB*3 

. 835 IF LEM T$<-3 THEN LET XA*LEN T 
$ 

336 IF LEN Q$< 3 3 THEN LET XB*LEN Q 

$ 
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840>LET R$=T$ (TO XA):LET S$*Q$<TQ X 
B) 

845 IF LEN S$<=2 THEN LET S$=" 

850 IF RMO40 OR RM<>24 THEN GO TO 

360 

852 IF R$-"U2M'" OR R$=”POK" OR 8$=''' 
VUK" OR 5$="PSA” THEM PRINT D$(4); 
GO TO 3000 

360 FOR N-l TO 16: IF R$=U$(N) OR S 
$=U$(N) AND N-ll OR Sf=y$(N) AND N=1 
2 OR S$=U$(N) AND N=13 OR B$=W$(N) A 
ND N=15 OR S$=W$(N) AND N=14 OR S$-W 
$(N) AND N=16 OR S$=W$(N> AND N=7 OR 

S$=U$(M) AND N-8 THEN GO TO 870 

861 NEXT N 

862 GO TO 90 ® 

870 REM COMMAND SECTION 


871 
! GO 

IF 

TO 

N=i 

900 

OR N= 

2 THEN 

GO SUB 4000 

872 

900 

IF 

N-3 

THEN 

GO 

SUB 

4500: 

GO 

TO 

873 

900 

IF 

N-4 

THEN 

GO 

SUB 

5000: 

GO 

TO 

874 

900 

IF 

N=5 

THEN 

GO 

SUB 

5050: 

GO 

TO 

875 

H00 

IF 

N-6 

THEN 

GO 

SUB 

5270: 

GO 

TO 

876 

3000 

IF 

N=7 

THEN 

GO 

SUB 

5380: 

GO 

TO 

877 

3000 

IF 

N=8 

THEM 

GO 

SUB 

5390: 

GO 

TO 

878 

900 

IF 

N=9 

THEN 

GO 

SUB 

5610; 

GO 

TO 

879 

IF 

N-10 

' THEN 

GO 

i SUE 

1 5700: 

; GO 
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TQ 900 

380 IF N«11 THEN GO SUE 5490: GO T 
n 3000 

881 IF N=12 THEN GO SUB 5510: GO T 
0 3000 

882 IF Ns 13 THEN GO SUB 5530: GO T 
0 3000 

8B3 IF Ns14 THEN GO SUB 5550: GO T 
0 3000 

S34 IF Ns15 THEN GO SUB 5570: GO T 
0 3000 . 

885 IF N=16 THEN GO SUB 5590: GO T 
0 3000 

886 IF RM=24 AND UOi THEN FOR N*0 

TO 2000: NEXT N: GO SUB 7490 

887 LET 3A=0: LET SB=0 

900 IF S$s"UDA" AND RM=21 THEN PR I 
NT M OLTAR SE POLAKO QTVARA,,. 

DEVQJKA JE PALA SA OLTARA I P 

RED VAMA SE UKAZAO KLJUC.": LET AL=1 
: LET G(3.i)«RMi GO TO 3000 

910 IF S$="SAR" AMD RM«83 THEN PR I 
NT " RIBNJAK SE POLAKO QTVARA.,."! L 
ET P(RM,3)s34: GO TO 3000 

920 IF S$s"2IV" AND RM*B2 THEN PRI 
NT " OLTAR SE UZ PRSAK PREPOLOVIO.": 

LET P(RM,S)s8S: GO TO 3000 

930 IF SSs"ROD" AND RM=B9 THEN PRI 
NT " OLTAR SE UZ PRASAK PREPOLOVIO," 
: :ET PiRM,2)=93: GO TO 3000 

940 IF GJ$s"VAMPIR" AND RM=96 THEN 
PRINT " ZAPADNI ZID SE UZ PRASAK 

OTVQRIQ,"j LET P <RM,4)=97: GO TO 

3000 

950 IF S$s"ZET" AND RM=92 THEN PR 
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INT * I3P0D VAS SE QTVORILA PUKOTINA 
I PROPALI STE KROZ NJU,": GO TO 75 

0@ 

960 IP Q$="5381900" AND RM=41 THEN 
PRINT " NA VELIKOM KOMPJUTERU 3U SE 
QTVORILA VRATA,"i LET PCRM,1)=4 
2: GO TO 3000 

970 IF R$="BAC" AND S$="KOS" AND RM 
-40 THEN IP 0(1,15=RM THEM PRINT " 
PAS JE UZEO KOST I0TI3A0,": LET D~ 
1: LET 0(1,1) =-2: LET Q(22,1)=~H: GO 
TO 3000 

980 IF R$="BAC" AND 3$="NGV" AND RM 
=34 THEN Ih 0(4,1)=RM THEN PRINT " 
CUJETE ZVEKET NOVCICA KOJI SE KOT 
RLJAJU NIZ BUNAR. ZASI EPl 

JEN I STE BLJESKOM! KADA PTE 

OTVORILI DC I PRIMETILI STE J 

OS DVOJA VRAT A."; LET P(RM,1)=36: LE 
T P(RM,4)=35; GO TO 1000 
990 GO TO 1020 

1000 LET 0(4,1)=~2: GO TO 3000 
1010 REM jfs * * * >!C # * * #W* 

1020 IF R$="BAC" AND S$="3AR" AND RM 
=43 THEN IF Q(25,1)=RM THEN PRINT 
" 2EC JE UZEO SARGAREPU I ' PQ 

BEGAD,": LET P(RM,4)=80: LET 0(25,1) 
=-2: LET R=i: GO TO 3000 
1030 IF R$="QKR" AND S$="PRE" AND RM 
=30 THEN PRINT " KADA STE OKRENULI 
PREKIDAC NESTO CRVENO BLJESNULO 
JE NA TAVANICI,": LET CE=1: GO T 
0 3000 

1040 IF R$="UZM" AND S$="PRS" AND RM 
=72 THEN GO TO 7530 
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i@50 IF R$ss"PQK" AND S$= W PR3" AND RM 
=72 THEN GO TO 7530 
1050 IF £;$="POM" THEM PRINT * *j t 
PRINT " PROBAJTE DA NACRTATE MAPU "} 

: GO TO 3000 

1070 IF Q$="KAMEN HUDR03TI" AND RM=9 
7 THEN FOR N=1 TO IN: IF I$(N.1, TO 

3)="KAM" THEN LET RM=31; PRINT * 2 
A3LEPLJUJUCI BLJESAK.,,": GO TO 3000 

1071 IF Q$= KAMEN MUDROSTI" • AND RM=9 
7 THEN IF I $ (N , 1. TO SXV'KAM'" THEN 

NEXT N 

1072 IF Q$="KAMEN MUDROSTI" AND RM=3 
7 THEN PRINT FLASH l:" NISTA SE ME 

DOGADJA" 

1030 FOR N=1 TO 16 

1081 IF R$=U$(N5 AND 5$="" THEN PRI 

NT FLASH is" ZAR NE UMETE DA BROJIT 
E ? KORISTITE DVE RECI ! 

If : GO TO 3000 

1082 IF 5$=W$(N) AND R$="" THEN PR I 

NT FLASH 1:" ZAR NE UMETE DA BROJIT 
E ? KORISTITE DVE RECI ! 

GO TO 3000 

1083 IF S$=W$<N) THEN GO TO 3000 

1084 IF R$=U$(N) THEN GO TO 3000 

1085 NEXT N 

1090 IF R$="POV" AND Q(20.1)=RM THEN 
PRINT " NECE HOCI OVE NOCI '": GO 
TO 3000 

1100 IF S$=”JEB" OR Rf= w JEB" THEN I 
NK 2: PRINT FLASH Is" JA BIH. ALI,. 

INK 7: GO TO 3000 
1110 IF S$="GOV" OR R$="SER” THEM 
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tm 4; PRINT FLASH 1;" PA.,, ME BIH 
! 11 1 FLASH 0; INK 7; GO TO 3000 
1130 IF 8$="MUD" OR R$="KUR" THEN I 
NK A; PRINT FLASH 1:" TO IMAM I JA 
i HA, HA, HA !"; FLASH 0: INK 7: GO 
in 3000 

1125 IF S $ =!! OR R$= " THEN PRINT 
FLASH 1;" ZAR ME UMETE DA'BROJITE ? 
KORISTITE DUE RECI ! 

"s GO TO 3000 

1130 INK 3: PRINT FLASH 1:" KAKO TO 
MIS LITE \: 

1135 IF T$<>"" THEN PRINT FLASH 1: 
T £ 

1136 INK 7 

3000 PAUSE 300: GO TO 550 

4000 GO SUB 4100: IF IN>*=8 THEN RET 
URN 

4001 FOR N=i TO 40 

4002 IF Q$ (N,2* TO 3)=S$ AND 0(N,1)= 
RM THEN LET I $(IN,1>=0$(N,2): LET I 
$ (IN. 2) =0$ CN, 1) : LET I (IN,1)0(N, 2) : 

LET 0 <N,1)~-2i PRINT D$(7): GO TO 4 
300 

4010 IF S$=Q$i N,2, TO 3) AND 0(N,i)< 
>RM THEN PRINT D$(i); RETURN 
4020 NEXT N: PRINT D$(3. TO 10H* " j 

4030 RETURN 

4100 IF IN>=8 THEN LET IN-IN-l: GO 
TO 4200 

4150 IF INK-7 THEN RETURN 
4300 LET IN-IN+1: IF IN>*8 THEN PRI 
NT FLASH 1:" VISE NISTA NE MOZETE D 
A UZMETE!"; FLASH 0: RETURN 
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1210 IF 3f="GV0" THEN LET K(i)«l 
4220 IF Sf="KLJ" THEN LET K(2)«l 
4230 TF 3f="PLA" THEN LET K (3) = 1 
4240 IF 3$="2LA' THEN LET K(45=i 
4250 IF Sf="KAM" THEN LET K(3)=l 
4250 RETURN 

4500 IF IN-I THEM PRINT D$(55; RETU 
RN 

4505 FOR N=i TO IN+i: IF Sf=If(N,i, 

TQ 3) THEM LET 0(I(N.15,1)=RM{ PRIN 
T D$3) ; GO TO 4550 
4510 NEXT M; PRINT D$<5): RETURN 
4550 FOR I=N TO IN; LET I f (I2) = I f (I 
+1,2): LET If (I,i)=If(I+i,i); LET K 
I.15-1(1 + 1.1); LET I(1,25=1(1+1,2): 
NEXT I; LET IN-IN-iI LET If(I-i,15= " 

! LET If (1-1,2)=""! LET 1(1-1., 15 =~1 
; LET I(I-i,2>=-i; RETURN 
5001 PRINT Df(55; RETURN 
5050 TF RM=40 OR RM=29 OR RH=53 OR R 
M = 17 OR RM-37 THEN GO TQ 5150 
5100 PRINT w NE VIDIM TA VRATA !“; R 
ETURN 

5150 IF RM-17 AND K(i)=1 THEN LET P 
(RM,35=27; LET D(15=l; PRINT Of(75; 

ppri ipf-.j 

5160 IF M>'1i<>1 AND RM=17 THEM PRIM 
T MEMATE KL-JUC ZA TA VRATA ! "; RET 
URN 

.5170 IF RM=29 AND K (2) =1 THEN LET P 
( RM,1 5 =30 ; LET D(25=1; PRI NT Df(7) ; 
RETURN 

5180 IF RM-29 AND K 5 25 01 THEN PR IN 
T » NEMATE KL-JUC ZA TA VRATA ’ ' : RET 
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5190 IF RM-37 AMD K(3)=i THEN LET P 
(RM,3)=31i LET D(3)=i: PRINT D$(7); 
RETURN 

5300 IF RM=37 AND K(3X>1 THEN PR IN 
T " NEMATE KLJUC ZA TA VRATA ! ": RET 
URN 

5210 IF RM=40 AND Kr<4)=l THEN LET P 
( RM. 1) =41 ; LET D( A) =1: PR I NT D$( 7); 
RETURN 

5330 IF RM=40 AND K<4)<>1 THEM PR IN 
T " NEMATE if: ZA TA UR AT A i "; RET 
URN 

5240 IF RM=63 AND K<5)=1 THEN LET P 
( RM,1 ) =72: LET D f5 5=1; PR INT D*(75: 
RETURN 

5350 IF RM=68 AND K(5)<>1 THEN PRIN 
T " NEMATE KLJUC ZA TA VRATA !"; RET 
URN 

5260 PRINT " NEMATE KLJUC ZA TA VRAT 
A !"; RETURN 

5270 IF S$<>0$(2.2, TO 3) AND S$<>0$ 
(6,2. TO 3) AND 5$<>"PRI " AMD S$0"S 
LI" AND Sf<>"OLT" AND S$0"LJU" AND 
3$<>"MET" THEN INK 6; PRINT FLASH 
ij" TO NE MOZETE ISPITATI !"; FLASH 
0: INK 7: RETURN 

5280 IF RH=0(2.1) OR RM=0(6.1) OR RM 
=0(20,1) OR RM=32 OR RM=38 OR RM=21 
OR RM=79 OR RM=69 THEN GO TO 5300 
5290 PRINT FLASH 1;" TOGA QVDE NEMA 
! FLASH 0 

5300 FOR N=1 TO 40; IF S$=Q$(N.2, TQ 
35 AND N=2 AND 0(N, 1)0-1 THEN PR I 
NT " U BIBlUI PISE ; SMRT KRIJE 
KLJUC •' ."; RETURN 


40 





PRSTEN MO Cl 


5310 IF S$=0$(N.2. TO 3) AND N=6 AMD 
0(N.1)< >-1 THEN 'PRINT " MA PAP IRU 
SU NASKRABANI BROJEVI ' 538190 
0 ' . ": RETURN 

533® IF 5$-Q$(N, 2. TO 3) AND N»20 AN 
D Q(N.1 ) =RM THEN PRINT " PRINCEZA V 
AS JE OSAMARILA I OKRENULA VAM L 
EDJA !": RETURN 

5330 IF S$="SLI" AND RM=33 OR RM=38 
THEN PRINT " NA SLIKAMA JE SHRT QLA 
VON, DOK POSMATRATE SLfKE POD S 

E QTVORIQ I VI STE PROP A LI... HI 
LET RM=iS: RETURN 

5340 IF St“"OLT" AND RM=3i THEM PRI 
NT " ISPITUJETE OLTAR, NA NJEMU 
PRIMECUJETE PUKOTINU."; RETURN 
5350 IF S$="LJU " AND RH=79 THEN PR I 
NT " ISPI TIME PIJANCE. JEDAN OD NJIH 
JE IZVADIO NQZ I UBO VAS PRAVO U S 
RCE, MRTVI STE !: GO TO 7500 
5360 IF S$=Q$(10,3, TO 3) AND RN=0(i 
0.1) THEN PRINT " METAK JE OD SREBR 
A I UBICE BILO STA,"; RETURN 

5370 NEXT N 
5380 G 0 T0 550 
5390 CLS 
5395 LET 3Q=0 

5400 PRINT AT 1.12}"NOSITE.,.* 

5410 PRINT : PRINT s PRINT 

5430 FOR M-l TO IN-1 

5430 PR I NT " "5 5 IF I $ (N ,1,50"" THE 

N PRINT I $i N,3)s LET 3Q=SQ+i 

5440 NEXT N 

5450 IF SQ-0 THEN PRINT " NE NOSITE 
BAS NISTA !'■ 
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5460 LET SQ=0 
5470 RETURN 

548® IF RM=24 AND UOl THEM GO SUB 
749S 

5490 IF P(RM,i)<>0 THEN LET RM=P(RM 
,i): PRINT D$(7) ; RETURN 
.5500 IF Pif?M,n=0 THEN PRINT D$C2<! 
RETURN 

5510 IF P(RM,2)<>0 THEN LET RM=P(RM 
.2): PRINT D$(7) : RETURN 
5520 IF P(RM,2)=0 THEN PR INT D$(2): 
RETURN 

5530 IF P (RM, 3)00 THEN LET RM=P (RM 
,2;i PRINT D$(7): RETURN 
5540 IF PCRM,3)=0 THEN PR I NT D$(2); 
RETURN 

5550 IF P(RM.4)<>0 THEN LET RM=P(RM 
. 4 ) ; PRINT 0$C7); RETURN 
5560 IF P(RM,4)=0 THEN PR INT D$(2): 
RETURN 

5570. IF P CRM, 5)00 THEN LET RM=P (RM 
,5) S PRINT D$ (7) ; RETURN 
5580 IF P CRM,5)=0 THEN PRI NT D$(2): 
RETURN 

5590 IF PCRM,S)<>0 THEN LET RM-PCRM 
,6): PRINT D$(7)s RETURN 
5600 IF P(RM,6)=0 THEN PR INT D$(2); 
RETURN 

5610 IF-S$<>•'•'v'UK” AND S$0"PRF THEN 
PRINT « NE MOGU DA UPUCAM ":Q$: RE 
TURN 

5520 IF SS-'VUK" AMD 0(23,i)=RM THEN 
GO TO 5640 

5631 IF S$="PR I" AND 0(20,$)=RM T HEN 
GO T n 5055 
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=1635 PRINT NEKO OD NAS GRES I D 

RUGAR, _ 'QVDE NEMA TAKVIH STVORE 

564i’FOR'N=i TO IM! IF I $(N,i. TO 3) 

='PIS" TMEN LET SA=1 

5643 IF If(N,1, TO 3) ="MET 3 THEN LE 

T 3R=1 

5643 NEXT N 

5644 IP SA=i AND 38=0 THEN PRINT F 
LASH 1: 1 NEMATE MUNICIJE ! "j. FLASH 0 
; RETURN 

5645 IF 3A=0 AND SB=8 THEN PRINT " 

UPERILI STE KA2IPRST U VUKO 

QuAKA": PRINT " BANG 1 ! KA2IPRST VAN 
Mt.te BIO NAPUNJEN": RETURN 

5646 IF SA=1 AND SB-1 THEN PRINT " 

IMPERIL I STE PISTOLJ U . VUKO 

DLAKA, BANG !! 

PAO JE MRTAV ! H : LET 0=8: RETURN 

5556 FOR N=1 TO IN: IF If CN«i« TO 3) 

=’PIS" THEN LET SA=1 

5657 IF If (N1, TO 3) = "MET" THEN LE 

5F5P NEXT M: IP 3A=1 AND SB=8 THEN 
PRINT " JA 3A PRA2NIM PISTOLJEM NE M 
nQU DA PUCAM 1 A VI RETURN 
5653 IF PA=8 AND SB-8 THEN PRINT « 
UPERILI STE KA2IPRST NA PRIN 

CEZU. BANG !! KA2IPRST VAN NIJE BIO 
NAP UN.TEN 1 "; RFTIJRN 
5668 IF SA=8 AND SB=1 THEM PRINT " 
NE MD2E 3E PUCATI BE2 PISTOlJA! TUPA 
NE 1 !": RETURN 

5661 IF SA=i AND 5B=i THEN PRINT " 
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JA NISAM UBICA! MECU VAS PUS 

TITI DA UBMETE PRINCEZU !"{ RETURN 
5700 INK 5: PRINT FLASH 1.:" NA CEMU 
DA TO UKUCAM ? INK 7; RETURN 
5750 STOP 

7490 FOR M-i TO 50! BEEP .006, hi! BOR 
DER RND*7s NEXT Ms BORDER 7: PRINT " 
VUKQDLAK VAM JE ZAP. 10 ZUBE U VRA 
T. NEMA VAM SPASA. MRTVI S 

TE ! " 

7500 PRINT AT 20.0: " ZELITE LI DA JO 
S JEDNQM QKUSATE SRECU ? (D/N)" t : 

INPUT A$; IF A$="D" OR A$="DA" THEN 
RUN 

7510 REM STOP 

7520 CLS : FOR N-i TO 1000: NEXT N: 
PAPER 6 

7530 PRINT FLASH ij" BRAVO !! PRONA 
SLI STE PR ST EM MOCI I MO'ZETE VLAD 
ATI SVETOM !!" 

7540 FOR I=-50 TO 50; BEEP .002,1; B 
EEP ,002,“Ii NEXT I 
7550 STOP 
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10>DXM Pi(97,192)!DIM P(97,6):DIM 
(40,2,32)sDIM 0(40,2)!DIM W$(16.3) 
2@ BORDER 0! PAPER 0J INK 7i CLS 
30 INK 5! PRINT AT 3,9s FLASH lj" 
Prsten moci "; INK 2; AT 5,12;" auto 
r "1 INK 7; PRINT AT 7,9; FLASH lj" 
Davs Edwards " 

40 FOR N*30 TO 40 
50 CIRCLE 120,60,N 
60 NEXT N 
70 FOR N*0 TO 10 
80 CIRCLE 120,100,N 
90 NEXT N 

100 PRINT FLASH 1;AT 21,6?" Molim 
vas sacaka.j te " 

180 RESTORE : FOR N~1 TO 97: READ P 
$(N),P(N,1),P(N,2),P(N,3),P(N,4),P(N 
,5),P(N,6); NEXT N 
190 FOR N-l TO 40: READ 0i(N,l),0(N 
,1),0$(N,25,0(N,2): NEXT N 
200 FOR N-i TO 16: READ W$(N); NEXT 
N 

5800 DATA " ISPRED OGROMNOG SABLASNO 
Q . ZAMKA, CUJETE POZIV U POMOC' 

KOME ME MOZETE QDOLETI",6,0,0,0, 

0,0 

5810 DATA " U MRACNOM LAVIRINTU",5,1 
4,14,3.0.0 

5820 DATA " U MRACNOJ SOBI... CIM ST 
E PREKORACILI PRAG PROPALI STE 

U JAMU PUNU -SILJAKA, MRTVI STE,,, 
PODSECATE NA SVAJCARSKI SIR".0,0,0,0 
, 0,0 

5830 DATA " U MRACNOM LAVIRINTU",14 
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,3,3,14,0,® 

3840 DATA " U MRACNOM LAVIRINTU",13, 

3830* DATA " U UNUTRASNJOSTI ZAMKA, 

tJ VLAZNOJ 1 SMRDLJIVOJ SOBIC 
I",14,0,14,5,0,0 

5880 DATA " U MRACNOM LAVIRINTU",14, 
14,14,14,0,® 

5870 DATA " U MRACNOM LAVIRINTU",14, 
10,14,14 : , 0". 0 

5880 DATA " U MRACNOM LAVIRINTU",7,1 
4,3,3,0.0 

5890 DATA " NA IZLAZU IZ LAVIRINTA", 
8,3,3,3.15,0 

5900 DATA " U MRACNOM LAVIRINTU",3,8 


.3,12,0,0 

5910 DATA " U MRACNOM LAVIRINTU",3,3 
,11,15,0,0 

5920 DATA " U MRACNOM LAVIRINTU", 14, 
15.15.0,0.0 

5930 DATA " U MRACNOM LAVIRINTU ", 3,3 
, 3,3,0.0 

5940'DATA " U MRACNOM LAVIRINTU",3,6 
.12.13.0.0 

5950 DATA " U HODNIKU NA DRUGOM SPRA 
TU",17,0.0,0.0.0 

5960 DATA " U HODNIKU SUDBINE",18,16 

, 0 . 22 . 0.0 

5970 DATA " IJ HODNIKU SUDBINE, NISE 
3E ODVAJAJU LEVO I DESNO.",21,1 

7,20.19.0,0 

5980 DATA " U ZAPADNOJ NISI. NA 3EVE 
RNOM I JUZMQM ZIDU SU PROZQRI KROZ 
KfOJE VIDITE GOMILU GOLIH LJUDI 
KOJE MUCE",0,0,18,0,0,0 
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5990>DATA " U ISTOCNQJ NISI, NA SEVE 
RNOM I JUZNOM ZIDU SU PROZORI KROZ 
KOJE VIDITE QOMILU GOLIH LJUDI 
KOJE MUCE", 0,0,0. 18,0,0 
6000 DATA " U SOBI SA OLTARIMA,",0,1 
8.0.0.0.0 

6010 DATA " U DUGACKQM HODNIKU",0,0. 
17,23.0,0 

6020 DATA " U DUGACKQM, SMRDLJIVOM I 
VLAZNOM HODNIKU,",25,24.22,0 

, 0,0 

5030 DATA " U VUKQDLAKQVQJ JAZBINI." 
.23,0,0,0,0,0 

6040 DATA " U DUGACKOM, SMRDLJIVOM I 
VLAZNOM HODNIKU.",26,23,0.0, 

0.0 

6050 DATA " U SAHTU ZA LIFT! IZNENAD 
A 03ECATE DA PADATE, PADATE NI 

Z SAHT!",0,0,0,0,0.0 
6060 DATA " U DUGACKOM, SMRDLJIVOM I 
VLAZNOM HODNIKU,",0,0,23,17, 

0,0 

6070 DATA " U DUGACKOM. SMRDLJIVOM I 
VLAZNOM HODNIKU,",29,0,0.27. 

0.0 

6080 DATA " U SOBI ZA MUCENJE, VIDIT 
E GOMILU GOLIH TELA,",0.28.0.0 

, 0,0 

6090 DATA " NA STEPENISTU,",0,29,0,0 
,31,1 

6095 DATA " NA TRECEM SPRATtJ" .32,0,0 
,0.0,30 

6.100 DATA " U SOBI SA MNOSTVOM SLIKA 
NA ZIDOVIMA",38,31,37,33,0,0 

6110 DATA " NA STEPENISTU KQJE VODI 
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NA SLEDECI SPRAT",0,0,0,0,34,3 

p 

6120 DATA "U SOBI SA BUNARQM. NA SE 
VERNOM ZIDU PISE ' MQZETE SACUVATI 
SVOJE STVARI U ODGQVARAJUCQJ 
SOBI ' ",0.0,0.0.0,33 
6130 DATA " U GLUVQJ KQMORI, NA PODU 
LEZI STARAC,",0,0.34,0,0,0 
6140 DATA " U SEFU, NA- ZAPADNQM ZIDU 
.PISE 'SVQ SVOJE BLAGO QSTAVITE OV 
DE'".0,34,0,0,0,0 

6130 DATA " U DUGACKOM, SMRDLJIVOM I 
VLAZNOM HODNIKU. NA ISTOCNOM 
ZI DU NALAZE SE VRATA",40,15,0,32 

',0.0 

6160 DATA " U DUGACKOM HODNIKU SA SL 
XKAMA NA ZIDOVIMA. ", 39,32,0,9,0., 0 

6170 DATA " U QRUZARNICI,",0,33,0,0, 

0.0 

6180 DATA " U PREDSOBLJU,",0,37,0,0, 
0,0 

A, 1 P0 DATA " U KOMPJUTERSKOJ SAL I 
NA TERM I NALL 1 PISE: 
tiNESI r E SIFRU '^.0.0.0,0.0.0 
A,200 DATA ij OTVORENOM SVETLARNIKU, 
",0,0,0.0.0.43 

fig 10 DATA " NA ULAZU «J SABLASNI LAV I 
RINT. ZNAK KAZE ’KLJUC JE NA PAPIR 
l i'",44,0,0.0.0.0 

fi220 PAT A " U LAVIRINTU".59.43,63,45 

70,0 

5230 DATA " U LAVIRINTU",46,0,1,63,0 
0 

5240 DATA " IJ LAV IRI NTU", 47, 1.0,0,0, 
0 
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6250 DATA 

, 0.0 

6260 DATA 

. 0.0 

6270 DATA 

0.0 

6280 DATA 

. 0,0 

6285 DATA 

0.0 

6290 DATA 

0.0 

6300 DATA 

. 0.0 

5310 DATA 

, 0,0 

6320 DATA 

,0 

6330 DATA 

0.0 

6340 DATA 

, 0,0 

6330 DATA 
ST! 

RAT",0,0,0 
5360 DATA 
6370 DATA 
, 0.0 

6380 DATA 

. 0.0 

6390 DATA 

, 0,0 

7000 DATA 

3,0,0 


U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

U LAVIRINTU" 

NA IZLAZU IZ 
PENICE VQOE N 
0,64.0 

' U LAVIRINTU" 

1 U LAVIRINTU" 

' U LAVIRINTU" 

1 U LAVIRINTU" 

' U LAVIRINTU 



,60,62,48,61 

,60,52,49,63 

,3,50,53,63, 

49.51,63.60 

50,50,52,0, 

53,52,3,51. 

54.52.59.59 

55.53.59.59 

0,54,0,56,0 

0,49,55,57, 

50,60,56,58 

LAVIRINTA. 

A SLEDECI SP 

, 1 , 1 , 1 , 1 , 0,0 
,50,61,62,63 

,50,51,62,63 

,60,61,62,63 

",60,61,62,6 
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7010 DATA " NA VRHU 8TEPENISTA ",67, 
0.66,65,0,0 

7020 DATA " U KUHINJI ",0,0.,64,0.0.0 
7030 DATA " U OSTAVI ",0,0,0,64,0,0 
7040 DATA " U HODNIKU KOJI VQDI U DN 
EVNU 3PBU",69,64,0,0,0,0 

7030 DATA " U QNEVNOJ SOBI, NA SEVER 
NIM VRATIMA PISE ' OVDE LEZI PRS 

TEN MOCI,' ZELITE LI DA BUDE VAS ?"\ 
0,67,70,69,0.0 

7060 DATA " U HODNIKU-KOJI VQDI DO S 
ALE ZA OBEDE",71,0,68,0,0,0 
7070 DATA " U HODNIKU KOJI VODI DO S 
ALE ZA OBEDE",73,0.0.69,0,0 
7080 DATA " U SALI ZA OBEDE",78,69,0 
, 0 , 0,0 

7090 DATA ." U SOB I U KQJOJ SE CUVA P 
RSTEN ",0.63,0,0,0,0 
7100 DATA " U SALI ZA OBEDE",78,70,0 
, 0 , 0.0 

7110'DATA " U PUSIQNICI",0,71,75,0.0 
,0 

7120 DATA " U SPAVACOJ SQBI ",0.0.76 
,74,0,0 

7130 DATA " U HODNIKU KOJI PQVEZUJE 

SOBE ",79,0,77,75.0,0 

7140 DATA " U SPREMISTU",0,0,78,0,0, 

0 

7150 DATA " U VELIKOT SPAVACOJ SQBI" 
,0,73,0,0,0,0 

7160 DATA " U PREDSOBLJU PUNQM PIJAN 
ACA",1,76,0,0,0,0 

7170 DATA " U SQBI SA PREKIDACIMA",0 
,0,43,0,0,0 
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7180 DATA " U HGDMIKU KOJI POVEZUJE 
SOBE".0,9,82,37.0,0 • 

7130 DATA " U SOBI SA OLTAROM POSVEC 
ENOM ZIVOTU".0? 0,83,81.0,0 
7200 DATA, " U SOB I SA RIBNJAKQM NA I 
STOCNOM KRAJU. RI8NJAK JE PUN SARANA 
", 0,0,0.82;. 0,0 

7210 DATA " U:VRTLAREVOJ OSTAVI ",0. 
36,85,83,0,0. 

7220 DATA " U VRTLAREVOJ OSTAVI ",0, 
87,0,84,0,0 

7230 DATA " U VRTLAREVOJ OSTAVI ",84 
,0,87.0,0,0 

7240 DATA « U VRTLAREVOJ OSTAVI ",85 
,0,0,36.0,0 

7250 DATA " U SHRDLJIVOM I VLAZNOM H 
QDNIKV KOJI POVEZUJE SOBE",82,89,0, 
0 , 0.0 

7260 DATA " U SHRDLJIVOM I VLAZNOM H 
QDNIKU KOJI POVEZUJE SOBE, " 

NA JUZNOM KRAJU HQDNIKA MALAZI 
SE QLTAR POSVECEN RODJENJU",38,0.0.0 
, 0,0 

7270 DATA " U MALDM MRACNOM PRQLAZU" 
,0,91,93,0,0,0 

7280 DATA " U MALOM MRACNOM PROLAZU" 
,90.92,0,0,0,0 

7290 DATA " U MALOM MRACNOM PROLAZU, 
NA ISTOCNOM.KRAJU PROLAZA 
NALAZI SE STATUA ZETEOCA,",9i,0, 
0 , 0 , 0,0 

7300 DATA " U MALOM MRACNOM PROLAZU" 
,89,0,94,90,0,0 

7310 DATA " U MALOM MRACNOM PROLAZU" 
,0,95,0,93,0,0 
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7380 DATA " U MALOM MRACNQM PRQLAZU” 
,34,96,0.0,0.0 

7330 DATA " U MALOM MRACNQM PRQLAZU, 
SA ZAPADNQG ZIDA PQSMATRA VA 
3 VAMPIR".93,0,0,0,0,0 

7340 DATA "U SOBI U KOJOJ SE CUVA K 
AMEN MUDROSTI".0,0,96,0,0,0 

7350 REM 
7360 REM 

7370 DATA "KOST", 17, "KQSM , "BIBLIJU 
", 19, " B18", 2,"KLJUC", -2, "KLJ", 3,"NOV 
CICE". S3,"MOV", 4, "BODEZ", 20, ”BOD", 5, 
"PAPIR",35,"PAP",6."KAMEN MUDRQSTI", 
97."KAM",7," KUHINJSKI NOZ",65,"NOZ", 
8,"<RST",66,"KRS",3,"SREBRNI METAK", 
69, "MET"', 10 

7330 DATA "HRANU".71,"HRA\ 11 . 

7390 DATA "VQDU", 76, "V0DM2, "BURE P 
IVA".77,"PIV",13,"FLASU", 73,"F LA", 14 
,"PRSTEN MQQI",7S,"PRS",15,"PISTOLJ" 
,39,"PIS".16 

7400 DATA "DIJAMANT",22,"DIJ",17,"ZL 
ATNU POLUGU",23,"POL",18,"SREBRNU PO 
LUGU",67."SRE",i9,"LEPU PRINCEZU",27 
,"PR I", 20,"PREKIDAC"> 80,"",21,"PSA", 
40,"".22,"VUKQDLAKA",24,"",23,"ZLATN 
I KLJUC",36,"ZLA",24,"SARGAREPU" ,15, 
"3AR".25 

7410 DATA "GVOZDENI KLJUC",18,"GVO", 
26."PLATINSKI KLJUC",38,"PLA",27, "TE 
GLU MEDA".10,"MED", 28,"KNJIGU CRNE M 
AGUE" ,14," KN J", 23." ASOV", 84, " ASO", 3 
0."VILJUSKU",87,"VIL",31,"MAC",90,"M 
AC",32."SVECU",76,"SVE",33,"CARSAVE" 
,75,"CAR".34,"TOLJAGU",61,"TOL",35 
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7430 DATA "MAGICNI STAPIC",50,"MAG”. 
36,"PASTU ZA 2UBE".59,"PAS",37,"FOTO 
GRAFIJU ZAMKA",S3,"FDT",38,"PENKALO" 
.35."PEN",39,"TQALET PAPIR",57,"TQA" 
,40 

7430 REM 

7440 DATA "UZM","POK","BAG","U8I", "O 
tK V' 13P","POG"," INV","UPU","UKU","S 
EV","JUG"," l ST","ZAP","GQR"."DDL" 
7450 REM 

7460 REM '*• ■ 

7470 REM 
7480 CLS 

7500 SAVE "1" DATA P$() 

7510 SAVE "2" DATA PO 
7520 SAVE "3" DATA 0*0 
753@ SAVE "4" DATA QO 
7540 SAVE "5" DATA W*0 














-] I M AVANTURE ZA VAS 
"j f~H I ZX SPECTRUM 


Sedam kljuceva 
Tarkusa 

U vetrom opustoseno'j zemlji Asgard severno od ve- 
likog grada Gamrota, na'lazi se ogromni splet odaja, tu- 
nela i peicina poznat pod iimenom Tarkus. N ! a pocetku 
ova j prostar je sluzio za igr'u zeni Erunga Nepobedivog. 
Medutim, nakon velicamstvene smrtii boga zvezda, vise 
nije koriscen. Mino&tvo legendi postoji o Tarkusu, po 
kojima se duh nestasnog boga Lokija krije u Unutrais- 
■njoj odaiji. Sedam kljuceva je potrebno da bi se otvorio 
kovceg u kome je Lokijev »jadni \ izmuceni duh«, 

U trenutku vase slabostoi lakornisjeino ste obecali da 
cete oslobodiiti Lokijev duh. Inace, na kojii drugi nacin 
biste otplatilii ogromni racun koji ste napravili organ i- 
zujuci veliku zafoavu u Mega-Galaktickoj Zevsovoj Caj- 
dzinici? 

S-ada ste u prvoj odajii Tarkusa posle dugog :i jedno- 
licnog puta kroz pustare Severne ravoice. Srecno i ne- 
mojte izneveniti, 

Dok pristupate resavanju ove igre koristeci se viso^- 
kom grafickom rezolucijom vaseg racunara, evonekoiiko 
korisnih sugestija. Prvo, iscrtajte plan vaseg kretanja 
krcxz prostorije, jer vas igira nasumice nece nigde dovesti. 
Dnugo, cuvaijte se zamki u vidu corsokaka. 
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10>BQRDER 7:PAPER 7:INK 0!PRINT AT 
i©, 7 1 "Pun j en j e Poda t ska " ■. 

2® GO SUB 1150; REM #U#D#G'S#V 
30 GO SUB 0390: GO SUB 0950 
40 LET k=0 
50 LET .1-33 

60 LET n=0: LET s=0! LET e-0; LET 
w-0 

70 CLS ; GO SUB 1210 

80 REM ===G1avna===Pet11a=== 

90 LET dc-Q “ ■ 

100 INK i 


110 IF 
UB 1310 

a(1,15=1 

THEN 

LET 

n=i: 

GO 

S 

120 IF 
UB 1420 

a(1,35=1 

THEN 

LET 

w=i: 

GO 

S 

130 IF 
UB 1380 

ad, 45=1 

THEN 

LET 

e=l: 

GO 

s 

140 IF 

a(1,25=1 

THEM 

LET 

s=i: 

GO 

s 


UB 1460 

150 INK 0; PRINT AT 21,5:" Broj klj 

U 160'IF 1 = 17 OR 1=37 OR 1=67 OR 1 = 11 
OR 1=82 THEN PRINT AT 14.10; FLASH 
1;"Nastradali ste":; PRINT AT 15,10 
; FLASH 1;"KRAJ IQRE, GO TO 0160 
170 IF k=7 AND 1=27 THEN GO TO 070 

0 

180 FOR x=i TO 100: IF l=x AND k(x5 
=1 THEN LET dc=l; BORDER 0: BORDER 
7; PRINT AT 12,14: FLASH l;" ":! 

PRINT AT 13.14: FLASH 1;" LET 

x=l@0: NEXT x;•GO TO ©200 
190 NEXT x 

200 IF dC=i THEN LET a$=INKEY$; I ■ 
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F a$="" THEM GO TO 0200 
210 IF dc=l THEM IF INKEY$="t" THE 
N LET k=k+i: LET k(1)-0; BEEP ,02,2 
3! BEEP .06,30: BEEP .08.36: PRINT A 
T 12,14s" ":: PRINT AT 13,14?" 

":: GO TO 0380 

220 IF INKEY "“ THEN GO TO 0220 
230 IF INKEYf="q" AND 1>10 AND a(l. 
1)=1 THEN GO SUB 0310: LET 1-1-10: 
GO TO 0380 

240 IF INKEY$="a" AND a(1.25=1 AND 
1090 THEN GO SUB 0310: LET 1 = 1 + 10: 
GO TO 0380 

250 IF INKEY$="o" AND a(1.45=1 THEN 
GO SUB 0310: LET 1=1-1s GO TO 0380 
260 IF INKEY$="p" AND a(1,35=1 THEN 
GO SUB 0310; LET 1=1+1: GO TO 0380 
270 IF dc=l AND INKEY$="t" THEN LE 
T k=k+l: LET a (1.15=0: LET a(1,25=0: 

LET a(1.35=0: LET a(l.45=0: GO TO 0 
380 

280 REM jW-Pogresan out### 

290 BEEP .05.10: BEEP .1.1: BEEP .1 

1.10 

300 FOR t=l TO 500: NEXT t: GO TO 0 
210 


310 OVER 1 


320 

=0 

330 

IF 

£=i 

THEN 

GO 

SUB 

1460: 

LET 

s 

IF 

e=i 

THEN 

GO 

SUB 

1380: 

LET 

9 

340 

IF 

w= 1 

THEN 

GO 

SUB 

1420: 

LET 

W 
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SEDAM KLJUCEVA 
TARKUSA 


350 IF n=i THEN GO SUB 1310: LET n 
-0 

360 OVER 0 

370 RETURN ^ 

380 FOR i~l TO 10: BEEP ,04,1: NEXT 
is. GO TO 0080 

390 REM i %%I n i c i ,i s 1 izac i j a 11 
400 DIM a(100,4): DIM k<100) 

410 FOR x-1 TO 100 

420 FOR y~i TO 4: READ a(x,y): NEXT 

y *" ■ 

430 NEXT x 

440 FOR x*i TO 100: READ k(x): NEXT 

450 REM **#Podaci**s|t 
460 DATA 0.0,0,0,63.63,63., 63.1,3,7, 
1.5,255.255,255,255.60,60,60,60., 60,60 
. 0,0,207,207,207,15,15., 15,0,0,255,15 
,7,3,0-0.0.0,0 

470 DATA 0,0,1.0,0.1,1,1,0,0,1,1,0, 
0,0,1.0,1,0,0 

480 DATA 0,1.1.0,0,0,1,1,0,1,0,1,0, 
1,1.0,0,1,0,1 

490 DATA 0.0,0,0,1,1,1,0,0,0,1,1,0, 

0 . 0 , 1 , 1 , 1 , 1,0 

500 DATA 1,1,1,1,0,0,0,@,1,1,1,0,1, 
1,0,1,1,1,0,0 

510 DATA 1,1,1,0,1,0.0,1,0,0,1,0,0, 
0.0,1 ,1 . @, 0,0 

•520 DATA 1, 1,0,0,0,0.1,0, 1,0,0, 1, 1, 
1,0,0.1,0,0,0 

530 DATA 1,0.1.0,0.1,1,1,0,0,1, 1,0, 
0,1,1. G, 0, 1, 1 

540 DATA 1, 1, 1,1,0,0,1,1,0,0,1,1,1, 
1.1,1,0,1,0,1 
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L r rrfmfh zx spectrum f f j-1-j j 

550 DATA 0.1.0.0.1, 1,1,0,0,1,1,1,0, 
1.0.0.0,0,1,0 

560 DATA 1,1.0.1,0,1,1,0,0,0,0, i , 1, 
1.0.0.1,0,0,0 

570 DATA 1,1,1,0,1,0,0,1,1,1,0,0,1, 
1,0.0.0.1,0,0 

580 DATA 1.1.1.0.1,1,1,1,0,0,0,i,1, 
0. i.0.0.1,0,1 

590 DATA i, 1,1.0,0,0,0,1,1, i, 1,0,1 .* 
0.1.1.1.0,0.1 

600 DATA 1.1.1,0.1,1,1,1,0,0,1,1,0, 
0.1,1,1,1.0.1 

610 DATA 1,1,1,0,0,0,1,1,1,1,1,1,0, 
1.1,1.0.1.1,1 

620 DATA 1,1,0.1,1,0,1,0,0,0,1,1,0, 
1,1.1.1.0.0,1 

630 HATA 1,1,0.0.0,0,0.0,1,0,0,0,1, 
0.'1.0.1.1.0,1 

640 DATA'1,1,0,0,0,1,1,0,0,0,1,1,1, 
0.1.1.0.1.0,1 

650 DATA 1.0.0.0.1,0,1.0,0,0,1,1,0, 
0.1.1.1,0.0,1 

660 DATA 1,0,1,0,1,0,0,1,0,0,1,0,0> 
0 0.1 , 1.0,00 

670 DATA 1.0,0.010,0,0,0,0* 1«0,0,0.« 
0 . 0 . 0 . 0 . 0 . 0 . 0 , 0 . 0 . 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 
0 ; 0 ; 0 ‘ 0 . 0 . 0 . 0 . 0 , 0 , 0 , 0 , 0 , 1 , 0 , 0 , 0 , 
0 , 0 '. r 

680 DATA 0,0.0.0.0.0,0,0,0,0,0,0,0, 
0 ,' 0 . 0 . 0 . 0 . 0 , 0 ’. 0 . 0 . 0 * 0 . 0 , 1 , 0 , 0 , 0 , 0 , 0 , 
0 , 3 , 0 , 0 , 0 . 0 , 0 . 1 , 0 . 0 . 0 . 0 , 0 , 0 , 0 , 0 , 1 
'690 RETURN 

733 REM WOda.ia svetilistaW 
713 LET w*INT (RND#50)! LET d-INT ( 
RMD*2wi; JF d<4 OR w<10 THEN GO TO 
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TARKUSA 


§710 

7S0 FOR i-i TO 16 STEP ,2: BEEP .00 
R.-l+i: BEEP .005.2+1; BEEP .003.4+i 
s'BEEP .05,5+i; NEXT i 
730 CLS ; PRINT : PRINT " Uspeli st 
e! Sakupili ste sedaro kljuceva i pro 
nasli svetilists Tarkusa" 

740 PRINT 

750 PRINT " Medjutim, postal i j os .j 
edan zadatak, koji treba da resits, 
da bi ste os 1 obodill Loki j ev“ duh." 
760 PRINT 

770 PRINT " Cuvari Tarkusa, vec du 
go rnrtvi, ostavili su otvor za vodu 
na kovcspu u kome .is Lokijev duh." 

780 F0R~t-i TO 2000! NEXT t: CLS s 
PRINT *. PRINT 

790 PRINT " Potrebno js ":wj" litr 
a vode da bi se otvorio kovceg "s PR 
I NT "Imate na raspo lagan.j u pesak ko.j 
i .is "id!" Puta laksi od vode" 

810 PRINT "Brzo racunajte! Imate na 
raspolaganju 30 sekundi." 

820 PRINT #0!" Pritisnite bil-p koj i 
taster kada ste izvrsili proracun, 

830 LET ans*w#d 

840 FOR i=i TO 2290! IF INKEY$>-CHR 
$ (48) THEN GO TO 0870! NEXT 1 
350 NEXT i 
860 GO TO 1110 

870 CLS : BORDER 0! INPUT " Sta je 
vas odaovor? "ja 
380 IF aOans THEN GO TO 1110 
890 CLS ; PRINT #0;" Uspeli ste! * 
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Oduzili ste se bogovi ma. Najzad .j s L 
ukijev duh Slobodan, Bogovi su v^m z 
ahvaini," 

900 FOR i~0 TO 7: BORDER is RANDOMI 
ZE USR 3280: NEXT i 
910 FOR i = i TO 1000 
920 NEXT i 

930 FOR 1*0 TO 60: RANDOMIZE USR 32 
80: BEEP (i/300),i: NEXT i 
940 STOP 

950 REM ##Instfukcije## 

960 INK 0: CLS : PRINT : PRINT 
970 PRINT FLASH 1:" SEDAM KLJUCEV 
A TARKUSA " 

980 PRINT : PRINT : PRINT " U vetro 
m opustoseno.i zeml.i i Asgard, severno 
ad velikog grada Gamrota, nalazl se 
splet eecina- i oda.ia poznat pod ime 
norn FLASH 1:'" TARKUS 

990 PRINT : PRINT U neistrazenam 
sPletu nalazl se sedam mitskih kl.juc 
eva. U koliko ih sve sakupite i pron 
adjete svetilists Tarkusa, mocicete 
da” oslobutite duh Lokija - boga svet 
losti," 

1010 PRINT #0:" Pritisnite bilo koji 
taster " 

1020 IF INKE¥$<>"* THEN GO TO 1040 
1030 GO TO 102© 

1040 CLS : PRINT #0; FLASH lj* SED 
AM KLJUCEVA TARKUSA 
1050 PRINT #0: PRINT #0: PRINT #©:" 
Da bi se oduzili velikim bogovima se 
verne ravnice "j 
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SEDAM KLJUCEVA 
TARKUSA 


1060 PRINT #0:"morate da oslobodits 
Lokijev duh, Nasli ste se na ulazu u 
Tarkus i upravo ste usli u prvu oda 

1070 PRINT #0! PRINT #0.:"lak.o poznaj 
ete pravila. igre vas strah je ipak v 
eliki!" 

1080 PRINT #0i PRINT #0j"Za kretanje 
u igri koristite :": PRINT #0: PRIN 
T #0;" ""Q"" - sever ""A"" - 

jug ""P"" - istok ^'"•0"" - 

zaoad ""T"" - uzmi kljuc" 

1090 IF INKEY$<>"" THEN RETURN 
1100 GO TO 1090 
1110 REM WNeuPotrebl j ivoM# 

1120 PAPER 0: INK 7: CLS : PRINT #0; 
"Pogresili ste u proracunu adnosa pe 
ska i vode. Tacan odgovor je "sans 
1130 FOR 1=0 TO 5: BORDER 0; RANDOMI 
ZE USR 3280: NEXT i 
1140 FOR 1=8 TO 0 STEP -1: BEEP .05, 
1: NEXT 1 
1150 STOP 

1 i 80 REM *#*U*#*D*#*G’s#*# 

1170 FOR 1=0 TO 40: READ user: POKE 
USR ■ , 'a" + i,user 
1180 NEXT i 
1190 RETURN 

1200 REM MMZaoadna vrataMM 

1210 CIS : INK 0 

1220 PLOT 0,30 

1230 DRAW 255,0.-1.5 

1240 PLOT 0.31 

1250 DRAW 255.0.-1.5 

1250 GO TO 1270: REM #**#krovm 
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lie® SB8 DRAW .255"(1+ 

i),0,1 
1290 NEXT i 
1300 RETURN 

1310 INK'4? REM smsevsrna vrata##* 

$ 

1320 PLOT 103,80 

■1330 DRAW 25,50,-1,5 

1340 DRAW 25,-50,-1,5 

1350 PLOT 105.80! DRAW 23,49,-1,5 

1360 DRAW 23,-49,-1,5 

1370 RETURN , x ^ 

1380 INK l! REM *****zapadna vrata*# 

jj( ^ 

1390 PLOT 0,105: DRAW 25,-55,-1,5 
1400 PLOT 0,104s DRAW 23,-55,-1,5 
141© RETURN x ^ 

1420 INK 1 ; REM Mttistoena vrata### 
1430 PLOT 255,105: DRAW -25,-55,1,5 
144© PLOT 255,104: DRAW -23,-55,1,5 
145© RETURN _ )i( _ ^ .. 

1460 INK 3: PRINT AT 14,10; "Postoi l 
i »*• PRINT AT 15,10j\iuzni izlaz”; 
1470 RETURN 






]~j I j j l~] l - ~ 

KRAJ SKOLSKOG DAHA I ”Tl 

___ rrtirn l 

Kraj skolskog dana 


Qpet ste bili nestasni. Zaiistia vam nije trebalo da 
stavite prasak »svrbljivac« na uciteljicinu stoliou. Sada 
trpite posledice svog nepromisljenog postupka . . . kaz- 
njem ste abavezni<m ostajanjem u skoli posle casova. 

Rainlje vam se niikad 'nije desilo da u skoli ostanete 
duze nego sto treba. Obicno, na prvii zvuk zvoria izjurite 
napolje. Da vam se i nainije desavalo da ostanetei u skoli 
duze, shvatili bi da sikola i nije samo sko'la?Morate brzo 
izbeci svim tim zamkama, ali kako? Sve sto vam mogu 
reci je da imate na raspolaganju sledeoih 15 komaindi: 

citaj n = sever 

otkljucaj s = jog 

otvori e = istok 

unisti w = zap ad 

I = pogledaj i = inventar 

Sve komande moraju biti izdate malim slovima. Ova 
sjajna igra, koju je napisao Adam Vering pokaziuje kako 
se dobra i uzbudljiva avantura moze programirati upo- 
trebom standardnih teh'nika — sistem povezanih prosto- 
rija, razlici’te zaprelke i slicno — ali u novom sadrzaju 
kao sto je skola. Nebrojeni su prostori u kojima se moze 
odvijati igra avantura, od 'koijih ce neki biti izlozeni u 
poglavlju »Kako progriamirati sopstvenu avanturu«. 



dobavi 

ostavi 

ubelezi 
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10X30 SUE 800@ 

20 LET ln=23 

30 BORDER 0s PAPER 0! INK 7 
90 CL3 

i00 PRINT " Ja sam u ":l$(ln) 

110 PRINT "Izlaz .ie (izlazi au) na: 

120 FOR 1=1 TO 3 
130 LET f$=e$(ln,i> 

140 PRINT " " i"Severu(n)" AND f* a "n 
"s"Istoku(e)" AND -f$="e";"Jugu (s) " A 
ND f " s"«"2aoadu (w)" AMD i $="w" 

' 150 NEXT i 

1 P.0 LET 1=1: FOR 1 = 1 TO. obj s IF p(i 
s 1 n THEN PR I NT '" V i d i m "o$ (1,4 TO 
); LET 1=0 

170 NEXT is IF f THEN PRINT '"Nice 
q na vidiku" 

'174 IF k=l THEN GO TO 6800 
175 IF ln=12 THEN LET k=k+i 
180 INPUT "> LINE r$: PRINT 
" s ri 

185 IF r$="" THEM GO TO 180 
18© IF LEN r$>5 THEN GO TO 300 
191 LET r$=r$Ci) 

195 IF r$="i" THEM GO TO 7000 

196 IF r$="1" THEN GO TO 100 

j.qo i pj Y$="nesw": FOR i=t TO 4: IF 
xi(i)=r$ THEM GO TO 200 

199 NEXT i; GO TO 6070 

200 FOR i=i TO LEN elQn) 

Pi© IF p$ (1n.15 =r$■THEN LET 1n=VAL 
d$an.i#2-l TO 1*25; GO TO 90 
220 NEXT i 

23© PRINT "Ne magu izvrsiti tu nar 
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edbu": GO TO 10® 

300 FOR i-4 TO LEM r* 

310 IF r$(1)-" " THEN GO TO 340 

320 NEXT i 

330 GO TO 6070 

340 LET x$=r$( TQ 3) 

35© LET y$=r$(i+i TO i+3) 

360 FOR v=l TO LEN v$ STEP 3s REM N 
aredbe 

370 IF x$=v$(v TO v+2) THEN GO TO 
40® 

390 NEXT v 
390 GO TO 6070 
4@0 FOR n=i TQ obj 
41® IF y$=o$(n. TO 35 THEN GO TO 4 
40 

42® NEXT n. 

43® PRINT r$( TO i).! w sta?"i GO TO 1 
30 

44® LET v=(v—1)/3 

450 IF Inal5 AMD n=7 AND o$(7,5)="z 
" THEN GO TO 652® 

49® GO TQ 900+VU00 
1020 IF p(n)=0 THEN GO TQ 6010 
103® IF p( n5<>1n THEN GO TO 6020 
1040 IF c>2 THEN GO TO 603® 

105® IF n>9 THEM GO TO 6®40 

107® LET c=c+l: LET p(n)=0 
109® GO TO 600® 

111® IF P(n 5 00 THEN GO TO 605® 

112® IF n-6 AND In*15 THEN GO TO 65 

00 

1130 IF r,a7 AMD In=3 THEN- GO TO 651 

0 

117® LET p(n)alns LET cac»i 
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1190 GO TO 6000 

1210 IF p(4)<>© THEN LET r*«f*( TO 
i)+"testers,"; GO TO 6050 
1220 IF nOl 1 THEN GO TO 6040 
1230 IF ln<>23 THEN GO TO 6020 
1250 IF e$ (235~"ne" THEM GO TO 6060 
1270 LET o$(115="pro otvoren prazor” 
• LET e$ (23) *="ne" i LET df (23)-"1524" 
1290 GO TO 6000 

1310 IF d( n)>0 THEN GO TO 6050 
1320 IF n<>3 THEN GO TO 6040 
1350 INPUT "Vez konopoac > ": LINE x 
$ 

1353 PRINT "> to ";x$ 

1355 IF LEN x$<3 THEN GO TO 6070 
1360 LET r$=r$( TO i)+"konopac za " + 
x$ 

1370 IF x$(i TO 3)<>"§ta" THEN GO T 
0 6040 

1330 LET c-C-lLET p$(3)="kat katap 
ult": LET>(25-99 
1390 GO TO 6000 

1410 IF In-9 AND n=13 THEN GO TO 65 
60 

1420 IF ln-33 AND n*14 THEN GO TO 6 
570 

1440 IF p(n)>0 THEN GO TO 6050 
1450 IF n«8 THEN GO TO 6200 
1460 IF n<>3 THEN GO TO 6040 
1490 GO TO 6550 

1510 IF n<>10 AND n<>15 THEN GO TO 
6040 

1520 IF NOT (In-4 AND n*10 OR ln*=20 
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AMD n-15) THEN . GO TO 6020 
1525 IF o$ (n,75 = y + " THEN GO TO 6060 
1530 IF In~20 THEN GO TO 1570 
1540 INPUT "Kombinaci.j a sefa ? "it * 
PRINT "> kombinacija : ":x 
1550 IF x 027446+301239+23-+48 THEN 
GO TO 6600 

1560 LET o$ (10)-"sefn otkljucan sef'' 

: GO TO 6000 

1570 IF p( 5)>0 THEN GO TO 6620 
1530 LET o$ (15)"" vr an 0 tk 1 j uc an a v r a 
ta" 

1590 GO TO 6000 

1610 IF n<>10 AND n<>15 THEN GO TO 
6040 

1630 IF NOT (ln=4 AND n-10 OR In=20 
AND n=15) THEN GO TO 6020 
1630 IF o$ <n . 85 = "v" THEN GO TO 6060 
1540 IF o$(n,8)<>"k" THEN LET r$=r$ 
+" "; GO TO 6040 

1650 IF ln=4 AND n=10 THEN LET o$(l 
05 s"cef n otvoren sef"! LET p < 5) =4: G 
0 TO 6000 

1660 IF In=20 AND n=15 THEN GO TO 6 
700 

1690 GO TO 6020 

1705 IF n<>16 THEN GO TO 5040 

1710 IF ln<>12 THEN GO TO 6020 

1720 IF p( 1)>0 THEN LET r$=r$( TO i 

)+"kuglicau"s GO TO 6050 

1730 IF p(35 >0 THEN LET r$=r$( TO i 

) + "kata.PU 11": GO TO 6050 

1740 LET o$(16)="Por u spa van port ir 
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": LET p( i)-99 
1750 LET k=2 
1790 GO TO 5650 

5010 PRINT "Pritisni bilo koji taste 
r za ponavnu iaru" 

5020 PAUSE 0 
5030' RUN 

5000 PRINT "OK..*; GO TO 180 

6010 PRINT "Use nosim": r$ (i TO 5 ,*"! " 

* GO TO 180 

6020 PRINT "Ne vidim*st$(i TO ):" ov 
de!": GO TO 180 

6030 PRINT "Nosim isuvise predmeta!" 
! GO TO 180 

6040 PRINT "Nemoguce ie ":r$( TO i)s 
1 r$(i TO 5 :"!GO TO 180 
6050 PRINT "Gitas listing sa stampac 
a s"" ’ #27446'"'" Listing iscezava i 
z tvojih ruku !•": LET c-c-i i LET p(9) 
-99: GO TO 180 

6050 PRINT "Kornbinaci.i a seta je vec 
otkrivena!": GO TO 180 
6070 PRINT "Ne razumem sta hoces"; G 
0 TO 180 

6200 PRINT -'Tekst glasi ?"' "Resi 2 ago 
netku~"'"Izracunaj zbir podataka na: 
tabli"'"** 1istingu"'zidu"'"i 
dobices sifru sefa." 

6205 GO TO 6000 

6500 PRINT "Morsko prase pi.je pivo!" 
; LET of(75~"pra pijana prase": LET 
o$(6)—"casn prazng casu": GO TO 1130 
6510 PRINT "Morsko prase se tetura p 
od de.istvom laserskog zraka! BANG!" 
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: LET Q$C7)-"pra ispeceno prase": LE 
T o$ i IE)-"rup ruPU u zidu": LET s$ (8 
)="esw"; LET d$(8)="091607": GO TO 1 
140 

£520 PRINT "Morsku prase te uhvatilo 
!!! Ponovo si u oritvafu!": GO TO 50 
00 

6550 PRINT "Na listingu pise: ""'2744 
6"' "Listing misteriozno nesta.i e!": L 
ET c-C'-l: LET p (9) -99: GO TO 180 
6560 PRINT "Na tabli pise:" '‘*23*48"' 

"-GO TO 180 

6570 PRINT "Na zidu pise:"'" Aka zel 
is uspeh zapsmpti broj "'"801239 
GO TO 180 

6600 PRINT "Pogresna si fra.! Alarm je 
aktiviran. Ponovo ste u pritvoru!!! 

!*■ GO IQ 5000 

6620 PRINT "Nemam nista sa cim bih o 
tkl.iucao!"; GO TO 180 
6650 PRINT "Portir je oogodjen i one 
svescen"; • LET p(l)=98; LET c=q-l: LE 
T o$i 16)- "po r ro r tir j e pobedjen ": G 
0 TO 6000 

6700 PRINT FLASH ij"Jzasli ste kao 
pobednik iz ove avanture!": GO TO 5 
000 

6300 PRINT "Strogi portir te je uhva 
tio i vratio u pritvor!": GO TO 5000 
7005 LET f-1 

7010 PRINT "Nosirn sa sobom;" 

7020 FOR i-1 TO obj 

7030 IF PCi)-0 THEN PRINT " "jo$(i 

,4 TO ): LET f=0 
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7040 NEXT i 

7050 IF i THEN PRINT " nista od tog 
a 

7090 GO TO 180 
7999 STOP 

8010 LET v$="uzrridobosttufyezcitotkot 
vuni * 

8050 LET ob.i =16! LET room=34 
8060 LET c“0 
8070 LET k=0 

8100 DIM 1$(room.25) : DIM e$(room.3) 

; DIM d$(room,65 
8130 DIM a$ (obj . 25) : DIM p (ob.j) 

8150 FOR n=1 TO room 
8150 READ 1$(n5 >e$(n),d$<n) 

8170 NEXT n 

8200. FOR 1 = 1 TO obj 

8210 READ'o$(i!,p(i) 

8220 NEXT 1 
8990 RETURN 

9010 DATA "sobi za racunbvodstvo","e 
s","0206","kabinstu za geograf i j u"," 
sw","0701" j "zbornici" ," es" .."0410","d 
irektor, kancelari j i", "ew""0503". "k 
ancelari.j i sekretara", "sw"," 1204" 
9020 DATA "kabinatu istorijs"."ns"," 
0114" . "kabinetu hsmi.je", "ne", "0208", 
"kabinetu i Izike","sw","1607","kabin 
etu matsmatike","esw","101708","sob1 
za ostavu”,"nsw","031809" 

9030 DATA "skolskom restoranu","ss", 
" 1819"," go rt i rn 1 c i"," nsw"," 052011",," 
R.E. prostoriji","es","1421","kabine 
tu francuskog","new","051513","kabin 
etu b 101091 j e""esw"," 162314" 
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9040 DATA "kabinetu QTIP-a","nw","08 
15", "kabinetu za racunare", "ns", "©92 
5","kabinetu za. eng 1 eski","ns", "l©26 
,"sko 1 skoj ambu 1 anti", "ns"," 1127"»" 
u 1 a z n o m h o 1 u"." n"," 12" 

9©5© DATA "kabinetu 2 a 1 at inski 7|?ne 
», » 1322", "kabinetu za nemacki", "w"." 
21"," sko1skom p ritvoru","e","24"^"ka 
binetu za teh . crtan.i e", "sw". "3023"," 
ka bine tu a a mu z i cko". " nes". "j. 72631" 
gw60 DATA "kab, za dram, sekciju","n 
e ,, ; ",«182725", " kab inetu za dornac i nstv 
n * ( "new"."192326"."kabinetu za umetn 
nst","sw"."3427","radionici za meta1 
*,"p","30","radionici za drvo","nw". 
"2429" 

307© DATA "svlcionici za. decakene 
"2532", " g i m n a s t i c k o j s a 1 i", " e w". " 3 
331","sv1acionici z a devojke","ew"," 
3432". "kabinetu za keramiku", "nw" .• "2 
833" 

9110 DATA "kug keramicku kuglicu",34 
,"sta rakljasti(Y) stag”,30,"kon kon 
ooac",27,"tur turpiju",29,"klj kljuc 
",99,"kri kriglu Pi vs",22,"pra zedno 
morsko prase".15,"tek list sa tekst 
cm", 18 

912© DATA "lis listing sa stamps,ca", 
17, "sef zakl.iucan set",4, "pro prozor 
sa resetkama",23."z ra 1aserski z rak 
", 8 

916© DATA "tab tablu",9,"zid ispisan 
zid",33,"ula zakljucan glavni ulaz" 
,2©,"por strogog portira",12 


71 






AVANTURE ZA VAS 
ZX SPECTRUM 


Svakidasnja 

avanlura 

Sam nas'lov kazuje o sadrzioi ove igre tavanture. Po- 
lazite iz vase ikuce, krecete se po uLicama u susedstvu i 
ulazite u autobus koji vas vod:i u centar gradia. No, ipak 
vam necu otkrit.i daljii zaplet ove :igre. To cete mo rati 
sami. Imajte na umu da je to svakidasnja situacija, u 
kojoj se nece pojavijivati carobnjaci i u kojoj necete 
morati da delite megdan sa neustraisivim alama. Vas za- 
datak je —- kaiko izbeoi lokalnog snagatora. 

Ova slozena, verovatno najnapetija igra pruzice vam 
sate ii sate oepoimucenog zadovoljstva ^i zabave. Na po- 
cetku igre od vas ce se zahtevati da odredite ’komamdnu 
imstanou. Ko.mandna instanca je priblizna broju dopuste- 
nih kretanja koje mozete uciniti u igri, i ja predlazem 
da zapocsnete sa sto veoim brojem. Beiz obzira na neko- 
Iiko smicalica najveoi deo igre posvecen je resavanju 
zadatka, cak i do odlluke o izbonu aarderobe. 
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q>REM ISUAKODNEVNA AVANTURA* 

Hi ink 2 

11 FOR t~0 TO 7; PAPER t: BEEP €-.2 
8,t*t: CLS ; NEXT t 

13 INK 4 

15 PRINT AT 2.6:"3VAK0DNEVNA AVANT 
UR A" 

16 INK 3 

17 PAUSE 200 

20 BORDER INT <RND#7>PAPER 0: CL 
S ; INK 7: BEEP .05.10: BEEP .07,0 

35 PRINT TAB (8): FLASH. 1: "Mol im s 
aceka.i te" j 

40 LET rn=0: LET,dk=0i LET ok=0: L 
ET p= 0; LET ww=0; LET =c=0; LET 1=1: 

LET mv=0: LET n=0! LET mn=0: LET nw 
=s0: LET cu=0: LET nr=300; GO SUB 217 

0 

50 REM *WGlavna -oetlja**** 

60 IF o(24)=-l AMD a(23)=-1 THEN 
LET cf—3 

70 IF o<13)si AND sc=0 THEN LET b 
(l.l)sr(l.l): LET b C1,2) =r U ,.2) : LET 
b <1.3)=rCl.3): LET b(1.A)=r(1,4): L 
FT rU.l>=0: LET r(1.2)=0: LET r(l,3 
)=0: LET r(1,4)=0: LET sc = l 

30 IF nw=3 THEN GO TO 1920 

90 PAUSE 0 

100 IF nr=mv-10 AND cfOl THEN PR I 
NT "Mokr.i ste do gole koze" 

110 LET mv*mv+i: IF mv>lv THEN LET 
1=37 ' 

120 BORDER INT (RND*7)i PAPER 0: CL 
S : INK 7: BEEP .05.10: BEEP .07,0 
130 PRINT AT 0,5:"SVAKODNEVNA AVAN ' 
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JURA" 

14© PRINT AT {.gi^aasastsssasaesas 
»*»'! PRINT 

150 IF 1*37 THEN PRINT TAB (10)i F 
LASH 1j"Mamina kuca"! PRINT 
160 PRINT "Vi ste•.i"* PRINT r$ (15 
170 PRINT i PRINT "Vidite..." 

180 IF 1*37 THEN PRINT "Malo srece 
zb. vas u nedel.iama ko.je dolaze"! 
BEEP .2.10! BEEP .5.0! STOP 
190 FOR t=l TO 30! IF o(t)=l THEN 
PRINT o*(t)t NEXT t 
195 NEXT t 

200 IF 0(165*1 AND (o(145*0 OR a(18 
5*05 THEN PRINT "Milicioner kaze""G 
ledaj decko nadam ss da ga ne duv 

a ?10 IF 0(135*0(165 AND 0(135*1 THEN 
PRINT "Citavi ate, milicioner je 
uhaps-io Petra zbog krsenja reda 
"s LET 0(135=12!.LET 0(165=102 
220 IF 1=36 THEN PRINT "Pocinje ki 
sa"! LET rn=l! LET nr=mv: IF cl=l TH 
EN PRINT "All vam to ne srneta" 

230 IF o(165=l AND cf=i THEN PRINT 
"Milicioner vas je uhapsio zbog no 
senja cizarna sa klincima koje mogu b 
iti omasno oruzje": LET mv*mv+S 
240 IF 0(165=1 THEN IF 0(115*0 THE 
N PRINT "Gubite mnogo vremena 

Objasnjavajuci da vas kisobran 
ni.ie ooasno oruz.ie"! LET mv=mv+3 
250 IF ww=l AND 1*24 THEN PRINT "D 
olazi autobus. Zelite li da udjete?" 
; INPUT w$i IF w$="da," OR w$="d" TH 
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EN PRINT "Usli ste u autobus"! LET 
1=25: LET mn=mn-lj GO TO 260 
255 IF ww=i AND 1=24 THEN PRINT b$ 
: LET mv*mv+INT (lv/25 
260 IF mn=0 AND o(l)=0 THEN PRINT 
"Nemate vise novca”: LET o(l)=102 
270 IF 1< 1 4 AMD o(26)=13 AND 0(2) >3 
0 AND o(65>30 AND o(7)>30 AND p(85 >3 
0 AND o(9)=14 THEN GO TO 1970 
280 PRINT : PRINT "A sta sad ?" 

290 INPUT c$; IF c$s="na.mesti Vazu" 
OR c$="na.mesti novu vazu" THEN LET 
o(26)=ls PRINT "Taka, i to ste uradi 
11"! GO TO 50 

300 IF LEN (c$5>2 THEM GO TO 400 
310 IF (c$="5" OR C$=".j "5 AND 1=7 T 
HEN PRINT "Pali ste niz stepenlce 1 
bill u nesvesti sve dok se mama nij 
e vratila kuci": LET 1=37: PAUSE 0 
; NEXT t: GO TO 50 
320 IF 1=7 AND c$=" 3 " THEN LET c$= 
" s" 

330 IF 1=7 AND c$="d" THEN’ LET c$= 

!l 1 l ' 

340 IF c$="s" AMD r( 1.1)00 THEN L 
ET l=r(1.1): GO TO 390 
350 IF c$=".i" AND r( 1.2)00 THEN L 
ET 1=r(1,2): GO TO 39® 

360 IF c$ ="i" AND r ( 1,35,00 THEN L 
ET l=r (1,, 3) s GO TO 390 
37® IF c$="z" AND r( 1,4)0® THEN L 
ET l=r(1.4): GO TO 39® 

38® PRINT "Ne mozete na tu stranu": 
BEEP ,2,1: GO TO 5® 

39® PRINT : PRINT "*M;mW*Krece 
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ts semmm***! pause 0: next t; 
GO TO 50 

400 GO SUB 2090S PRINT s LET x*425 

401 IF n=0 OR n*l THEN GO SUB 4501 
GO TO x 

402 IF n=2 THEN GO SUB 540! GO TO 

X 403 IF n*4 OR n*5 THEN GO SUB 510! 
GO TO x 

404 IF n*5 THEN" GO SUB 590! GO TO 

*405 IF n-6 OR n=7 THEM GO SUB 720; 
GO TO x 

406. IF n=S OR n-31 OR n=32 OR n=33 
THEN GO SUB 780s GO TO x 
407 IF n=9 THEN GO SUB 950; GO TO 

'”'403 IF n-10 THEN GO SUB 1050: GO T 

°409 IF n-H OR n-12 THEN GO SUB 11 
10: GO TO x 

410 IF n-13 THEN GO SUB 1180: GO T 

p x 

Vll IF n=14 THEN GO SUB 1230: GO T 
0 X 

412 IF n-15 THEN GO SUB 1300: GO T 

°413 IF n-16 THEN GO SUB 1380; GO T 
0 x 

414 IF n=17 THEN GO SUB 1500; GO T 
0 x 

415 IF n=18 OR n-24 THEN GO SUB 15 
50: GO TO x 

415 IF n=19 OR n =20 OR n=21 THEN G 
0 SUB 1640: GO TO x 
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417 TF n=22 THEN GO SUB 1710: GO T 

0 x 

418 IF n-23 THEN GO SUB 1760: GO T 
0 x 

419 IF n-25 OR n=26 THEN GO SUB 18 
10; GO TO x 

420 IF n=27 THEN GO SUB 1880: GO T 

0 X 

421 IF n=23 THEN GO SUB 1390; GO T 
0 x 

422 IF n=29 THEN GO SUB 1900; GO T 

0' x 

423 IF n=30 THEM GO SUB 1910 

425 IF ok=i THEN LET ok=0: PAUSE 0 
; NEXT t: GO TO 50 
430 PRINT : PRINT "#.########* 

! %%%%%%%%%*%%%%» 

440 GO TO 50 

450 REM mUzrni/Pokupim 
460 IF p= 5 THEN PRINT "Nista vise 
ne mozete Poneti": LET ok—i: RETURN 
470 FOR t*i TO 28; IF g$C TO 4)-z$C 
+) AND d(dv)=1 THEN LET dv*t: LET t 
-28: NEXT t: GO TO 490 
475 NEXT t 

480 PRINT "Toga dvde nema": RETURN 
490 IF dv-2 OR dv=7 OR dv=12 OR dv* 
13 OR dv-15 OR dv-16 OR dv-6 OR dv=2 
S THEN PRINT "Ne budite ludi, to je 
beskorisna": LET dv*0: LET ok*l: RE 
TURN 

500 IF dv-10 THEN PRINT "Zajepljen 
je za plocnik": RETURN 
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510 IF 1-29 OR 1=31 OR 1=32 THEN P 
RINT "To se kupuj e "i RETURN 
520 LET o(dv)=0! IF o(1)=® AND 1=1 
THEN LET mn=3 
525 BEEP .05,20 
530 RETURN 
540 REM 

550 IF o(12)=1 AND g$="novae" AND m 
n>0 THEN LET mn=rnn-li PRINT "Drugs.r 
dacu ti savet, potrazi neku dobru 
zensku u .iavno.j kuci u centru"! FOR 
t=l TO 500: NEXT ti RETURN 
560 IF o(26) =0 AND 1013 AND g$="no 
vu vazu" THEN PRINT "Preporucujem y 
am da je vratite na mesto": RETURN 
570 IF o(26)=0 AND 1=13 THEN PRINT 
FLASH 1:"CANGR!!":: PRINT " Niste 
vi baci1i vazu, To se desilo sino 
c na zurci": LET o(265=31: LET o(8)= 
13: RETURN 

580 IF o(dv)=0 THEN LET o(dv)=l: R 
ETURN 

590 IF dv>0 AND dv<99 THEN PRINT " 
To nemate": LET ok=l: RETURN 
600 PRINT "Sta to lupate 7 ": LET ok 
=1: RETURN 

610 REM ####ocisti/5Premi##:lt* 

620 LET kk=0 

530 IF o(dv)=2 OR o(dv)=10 OR o(dv) 
=12 OR o(dv)=13 THEN LET kk=l 
540 IF 1=2 AND kk=i THEN PRINT "Ur 
edno su skl.ion.ieni": LET o(2) = 102: R 
FTURN 

650 IF i?k=l AND o (95=0 .AND lOo(dv) 
THEN PRINT "Me mozete spremiti ns 
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sto cega nema": RETURN 
660 IF kk=i AND l=o(dv) AMD a (9)00 
THEN PRINT "Sta, zar golirn rukama 
?": RETURN 

67® IF kk=i AND 1=o(dv) AND o(9)“0 
!HEM PRINT "Brzo ste to spremili. B 
ill bistedobra kucna pomocnica i 
ET n(dv)=102: RETURN 
6S0 PRINT "To ne mozete uraditi • 
RETURN 

6S0 REM ***:*Gbuci:m* 

700 IF dv>22 AND dv<26 AND o(’dv)=0 
THEN PRINT "Na sebi irnate ":b$(dv)j 
LET o(dv)~-i: RETURN 
720 REM tttfBezifttt* 

730 IF 0(13)01 AMD a (16)01 THEN 
PRINT "Qd cega biste da pobegnete ?" 

; RETURN 

740 IF (o(13)OI OR o(16)—1) AND of 
"3 THEN PRINT "Pcbeqli ste sa lakoc 
om"! LET o(13)=1 + 1 NT (RND*6); LET o( 
16) =1 — 1 NT (RND-K3) : GO TO 770 
750 IF INT (RND#5)=1 THEM PRINT "J 
edva pobegoste" s LET fnv-mv+3: LET q'( 
13) =1 + 1 NT (RND#3) i LET a(15)-1-INT ( 
RND*3): GO TO 770 

760 IF (o(13)=1 OR o(15)=1) AND cf< 
>2 THEN PRINT "Ni.je uspsIo. uhvacen 
i ste" • LET mv=mv+5s RETURN 
77® LET r ( l.. 1 > =h (1,1)7 LET r (1 . 2) =b 
(1.2): LET r(1,3)=b(1,3): LET r(1.4) 
=b(1.4): LET sc=0! RETURN 
7 8 @ R E M * t $ U b i /Un i s t i 11 % 

730 CLS : PRINT 

80® PRINT FLASH 1s" t%t% %11% % % % % % % . 
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nttttttwntwr 1 ; 

gi0 PRINT FLASH It**" 

(3i)t FLASH lt"*"s 
320 PRINT FLASH it"*" 

,C.C.C... Vi stvarno 
1;"*"; 

83-0 PRINT FLASH If"*", 
islite da .ie u ovoj igri 
1;" *"; 

840 PRINT FLASH If"*" 

□ dozvoljeno, 

1 * ''' % }t 1 

850 PRINT FLASH i,;"* i! 
akve 2Is komande ovde 
i f" * *: 

860 PRINT FLASH if"*' 
see nikako proci 

i » a % » » 

890 PRINT FLASH if "*' . 
a kaznu sets izgubiti par 

I • " * " ; 

900 PRINT FLASH if"*"5 FLASH 0f" m 
inuta, vaseg vrednog vremena ; flAjM 

qi0*PRINT FLASH if"*"f FLASH 0fTAB 

731)! flash i: "**: 

920 PRINT FLASH 1 .:"*"; FLASH 0fTAB 
(31) f FLASH. if**"t 

930 PRINT FLASH 1:* * * ** * * * **** * *** 
% % t % % * * * * * * * * * * * * " ! 

940 fhr t»l TO 3000! IF INKEY$<>"" 
THEN LET t-3000: NEXT t 
'945 NEXT t 
950 RETURN 

960 REM ****Udari**** 


FLASH 0? TAB 

FLASH 0f C 
"f FLASH 

FLASH 0? m 
FLASH 

FLASH 0?" t 
"; FLASH 

FLASH 0f" T 
"; FLASH 

FLASH 0f" n 
FLASH 

FLASH 0f" Z 
FLASH 








970 IF dv<>27 AND dv<>12 AND dv<>13 
AND dvOiS AND a (dv) =1 THEN PRINT 
"Nije u redu da svoj bes isk 

a 1 j u j e te n a oka 1 n i it. stvarima" : RETUR 

N 

980 IF dv=27 AND o(23)=l AND b$(t)= 
"devojka" THEN PRINT "Zar se tako p 
ostupa sa damorn ! Vase ponasanje va 
m zatvara put ka uspsHu !"s LET 1=3 
7i RETURN 

990 IF dv=12 AND o(dv)=I THEN ■ PR IN 
T "Sarno je trazio novae na zajam, T 
o je bilo maid okrutno, Sakrio se i 
rnozda ga necete videti mesecima" 
! LET o(12)=103! RETURN 
1000 IF dv=13 AND o(dv)=1 THEN PRIN 
T "Mora da ste ludi, pa on je dva p 
uta. veci od vas" 

1010 IF dv=13 AND o(dv)=1 AND ct=i T 
HEN PRINT "Brz udarac cizmom ga je 
sredio"! LET o(13)=INT (RND#36): LET 
r(1.1)=b(1,i); LET r(1.25=b(1,2): L 
ET r(1,3)=b < 1.3) : LET r(1,4)=b (1,4) : 
LET sc=0: RETURN 

1020 IF dv=13 AND o(dv)=l THEN PRIN 
T "Probudili ste se osamuceni, P 
onovo ste kod kuce, U modricamaste i 
vaseg novea vise nerna"! LET mr.=0! R 
ETURN 

1030 IF dv=16 AND o(16)=1 THEN PRIN 
T "Kakva glupost! Milicioher je u 
zvratio Pendrekom! 000 !!"s LET 1=3 
7: RETURN 
1040 RETURN 

1050 REM *###poPij*m 
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106© IF q( 13)<>© AMD o(2©)<>© AND o( 
21)00 AND o(22)<>0 THEN PRINT "To 
prvo morats uzeti": RETURN 
107© IF (dv=13 OR dv-21 OR dv=22) AN 
D 1=34 THEN PRINT "Dobro. j ako pice 
"i LET dk=dk+i: LET o(dv)=102 
1080 IF dk=3 THEN PRINT "Teturate s 
s unaokolo"! PRINT , , , . "Wiiddiittee 
dduupplloo !("! LET 1=37 
1030 IF dv=20 AND 1=34 THEN PRINT " 
Vi ste jaki i pice vas je divno osv 
ezilo." 

1100 RETURN 

111© REM MMpomac/savet#### 

1120 LET vf="" 

1130 IF INT (RND*7)=1 THEN LET v$=" 
U gradu as desava.iu grave stvari"; Q 
0 TO 1170 

114© FOR t=l TO 9: IF H(t)=l THEN L 
ET v$=h$(15: LET t=3: NEXT t 
1145 NEXT t 

115© IF v$="" THEN LET v$="Ovde vam 
nema pomoci" t (30 TO 1170 
116© IF INT (RND:K6)-i THEN LET v$=" 
Ovde vam necu pomoci" 

117© PRINT "Savet:": PRINT v$; RETUR 
N 

118© REM ####Cekaj %%%% 

1190 IF 1<24 AND 1>26 THEN PRINT "V 
reme prolazi,,.": FOR t=l TO 4©0@: N 
EXT ti RETURN 

1200 IF 1=24 THEN LET ww=i 
121© IF I>24 AND I<27 THEN PRINT "A 
utobus i dal.je ids": PAUSE 10: NEXT 
t: LET 1=1+1: RETURN 
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1220 RETURN 

1230 REM #mkupi*m 

1240 IF mn<1 THEN PRINT "Negate nov 

ca i nista ns mozete kupiti"! RETUR 

N 

1250 IF 1=22 OR 1=29 OR 1=31 OR 1=32 
THEN 00 TO 1270 

1260 PRINT "SkIgnite novae, ovde nis 
ta necste kupiti"! RETURN 

1270 IF 1>19 AND o(dv)=l THEN PRINT 
"Sada imate "{: PRINT o$(dvfs -LEf o 
(dv) =0: LET mn=mn~i: RETURN 
1280 IF 1 = 19 AND 0(12)=1 AND g$="aca 
" THEN PRINT "Probajte da bacite no 
vac"s RETURN 

1290 PRINT "Kako to rekoste"! RETURN 

1300 REM MMreci##*# 

1310 IF g$="pgtrebna mi .je pgmoc" TH 
EN PRINT "To ni.je odgovarajuca koma 
rid a" i RETURN 

1320 IF (g$="divno izgledate" OR g$= 
"veoma ate lepi" OR g$="vslim vas" 0 
R g$="slatki ste" OR g$="divni ste") 
AND o(27)=l AND of>2 AND cu=l THEN 
LET cu=2: 60 TO 1370 
1330 IF (g$="zdravo drumar" OR qf< T 
0 33 = "cao"3 AND o(123=1 THEN PRINT 
"CaoI": RETURN 

1340 IF 0(273=1 AND cf<3 THEN PRINT 
"Bez obzira sta kazete, vasa oo 
java kvari sve"s RETURN 
1350 IF 0(273=1 AND cf=3 THEN PRINT 
"Vasi komentari me ns interesuiu.Pr 
oba.jts nesto drugo!"s RETURN 
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13A® TP -(27)01 THEM PRINT "Me raz 
ljme v.35" * RETURN 

i’q-7 ® prtmt "Hvsla, bas ste zlstr.i. M 
qou’m vam Pdmoci ?": RETURN 
1 Rp® REM * * * P i ta.i * '* :* % 
iRR® LET 1 $=" 11 1 IF g$(LEM 9$ TO LEN 
)="•?« THEN LET gi=g$( TO LEN g$-i 

140® IF cu=® AND q$="dolazite li ces 
to ovde" AND o(27)=l AND d<>! THEN 
L ET l$="Ponekad. cakarvi": LET cu=i 
1410 TF ry=0 AND o(27)=1 AND g$="dol 
szite li cesto ovde" AND ct=i THEN 
PRINT "ijoh! Kako ste to obuceni 
LET o(27)=INT (RND*36) 

142® IF g$="kako ste" AND (o(275=1 0 
R o(12)=1 OR o(16)=1) THEN LET i$=" 
Me tako lose"; IF o(125=1 THEN LET 
1 i=1 $+", a 1 i s a m s v o r c" 

143® IF g$="mozete li mi pozajmiti n 
esto novca” AMD cu=2 AND o(275=1 THE 
N LET l$="Naravno. evo vam J petak’" 
: LET mnssmn+5 

144® TF 1=34 AND o(125<>l AND o(13)< 
>1 AND o(16X>l AND o(27)01 AND dk= 
® THEN LET lS="Prvo POPi.jte nesto, 
na racun kuce" 

145® IF 1=34 AND dk>0 AND g$="kako d 
=5 se vratim kuci" OR g$="kako cu sti 
ci kuci" THEN LET r(30,i)=15: LET 1 
$="Idite do samoposluge pa na sever" 
1460 IF o(16)=l AND gf="kako da. se 
vratim kuci" OR af="kako cu stici ku 
ci" THEN LET l$="Jednostavno, idit 
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© do samoposlyge pa Severn 

p, ill skrenite istocno kod post 
anskog sanduceta"! LET r(30,l)=15 
1470 IF g$*"koliko je sati" AND (o(l 
6)=1 OR 1-35) THEN LET l$*"0ko pola 
4 drugar" 

1480 IF IS*"" THEN LET l$="Pitanje 
nije pravilno" 

1490 PRINT ,,1$: LET Ok*Is RETURN 
1500 REM m#Prooitaj**« 

1510 IF i$ (dv)*"poru" AMD p(dv>*0 TH 
EN PRINT "Pise : Vraticu se 4-og ok 
o 4 , Voli te mama xxx"; PAUSE 0: RE 
TURN 

I5H0 IF zS(dv)*"kale" AND 1=6 THEN 
PRINT "Pise : ponedeljak. 4-ti apri 1" 
: RETURN 

1530 IF dv*13 AND aC15)=l THEN PRIN 
T "Pise 'prolecn.ja rasprodaja - u 
s ted its na priboru za ciscen.je u gvo 
zdjarskpj radnj i y ceritru'"; RETURN 
1540 PRINT "To ne rnozete procitati"! 
RETURN 

1550 REM IWPpgleda.j/IspitajW 
1560 IF zS(dv)="devo" AND o(dv)=1 TH 
EN PRINT "Osamarila vas je i otisla 
, Take se ne postuoa sa damom"f FOR 
t*l TO 100: PAUSE 0: NEXT t: LET ok* 
1: LET o(dv)~INT (RNDI36): RETURN 
1570 IF z$(dv)*"nova" AND l=o(dv) TH 
EN PRINT "Oblean oetoparac zaleplje 
n za plocnik": LET ok*l: RETURN 
1580 IF dv*4 OR dv=5 OR dv*13 THEN 
PRINT "Probaj neku drugu kornandu" l 
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RETURN 

1590 IF <1>22 AMD i<26) AMD dv>22 AM 
D dv<26 THEM PRINT "Kvalitetno i ni 
j@ Preoenjeno": RETURN 
1600 IF dv=8 AND l=o(dv) THEM PRINT 
"Izgleda u losem standu. Sve u sv 
emu S kornada.": RETURN 
1610 IF dv=28 AMD 1=8 AND mv<15 THEN 
PRINT "Sada je 14 casova": RETURN 
1620 IF dv=28 AND 1=8 AND mv>15 THEN 
PRINT "Sat je stao na 15:30": RETU 
RN 

1630 PRINT "To ne mozete ispitati": 
RETURN 

1640 REM UtZalepi/Prilepi/Duvaj % 

1650 IF o(14)<>0 AND o( 18)00 THEN 
PRINT "Dime, mozda vazduhorn?" 

1660 IF (o(14)=0 DR o(18)=0) AND z$C 
t)="petr" THEN PRINT "Dobra ideja, 
a1i na za 1os t neostvar1jiva" 

1670 IF o(18)=0 AND z$(t)="mi1i" THE 
N PRINT "Verovali ill ne, uspelo je 
, Sadaste siqurni \" 

1680 IF o(8)=0 AND o(14)=0 THEN PRI 
NT "2a to varn treba druga vrsta 
leoka": RETURN 

1690 IF o(8)=0 AND o(18)=0 AND INT ( 
RND*3)=1 THEN PRINT TAB (10):"Uspel 
o .1 e! ! !": LET o(B)*102‘. LET o(26)=0: 
RETURN 

1700 PRINT "Ne valja. Zalepili ste s 
ami sebeSada cete morati da sacekate 
mamu,": LET 1=37: FOR t=l TO 100 
0: NEXT t: RETURN 
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1710 REM ####Otvori*m 
1720 IF dv-ii AND o<dv>*0 THEN PRIN 
t "ntvorili ste kisobran !, i 
1730 IF rn=0 THEN PRINT "ali bez 
ootrebe"; LET um=i: RETURN 
1740 PRINT "i necete pokisnuti": LE 
T rn-0; LET um=l; RETURN 
•1750 IF um=l THEN LET p=p+1; IF p =6 
THEN PRINT "Ruke su yam bile prepu 
n p a a ste ispustili kisobran"*. LET o 
( 111 = 1 : LET um=0! RETURN . 

1760 REM ##*#Zatvpri#*#* 

1770 IF Q (11)<>0 THEN PRINT "Mogli 
ste otvoriti samo kisobrana njega ne 

1730 IF o(11)-0 AND um=0 THEN PRINT 
"Uec .ie zatvoren" 

1790 IF o(lt) =© AND z$(t) = , ''kiso" AND 
ym-i THEN PRINT "Zatvoren je";: IF 
rn-1 THEN PRINT ",a kisa pl.justi"s 
LET um-0 

1300 PRINT ! RETURN 

1810 REM W*Inventar/Lista#W 

1320 LET o=l 

1830 CL3 : PRINT TAB (2): FLASH ij"S 
PISAK ST VAR I KO-JE NOSITE!" 

1340 PRINT TAB (2) j «=«=======*===== 

S 8 hs»»s>i PRINT ; PRINT 

1850 FOR t=l TO 26; IF o(t)<i THEN 

PRINT " "* FLASH 1;p; FLASH 0;")";o$ 

(t): LET p=p+i; NEXT t 

I860 NEXT t! PAUSE 0 

1370 RETURN 

1380 PRINT "I hocu aka mi se pruzi p 
rilika!!": LET ok=ls LET nw=nw+l; R- 
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ETURN 

1SS0 PRINT "Francuski vam ne ids naj 
ba lie''; LET ok=i! LET nw=nw+i: RETUR 
N 

19 00 PRINT ; 'Bss ste zli!M": LET ak= 

1 1 LET r>w=nw+l; RETURN 

1910 PRINT •'•'To nije lepa, jel 1 da V’ 

; LET ok-1: LET nw=nw+ls RETURN 
192© REM #mA*TeIlinq*Qff**## 

1930 CLS 

1940 PRINT ,," Morate ee uzdrzavati 
od grubosti. Tako se ne rnoze 

proci kroz zivot. Moracu da vas nauc 
impameti..." 

1950 PRINT ,,"Sada ce program nestat 

1960 IF nw-3 THEM FDR t=i TO 500: N 
EXT t: NEW 

1970 REM m#A*Win*At#Last!#*** 

1980 REM 
1990 REM 
2000 CLS 

2010 PRINT ,Mama se vratila ku 
ci, pogledala unaokolo i zac 

udila se kada ju je zatekla clstu. 

2020 PRINT ,."Taka je zacudjena da v 
am je daIapokIon. Ski date ornot i vid 
ite,.," 

2025 FOR t=l TO 500: NEXT t 

2030 FOR i=7 TO 0 STEP -1: BORDER i: 

BEEP .05.i: BEEP .05.-is NEXT i: FO 
R i-0 TO 7: BORDER i: BEEP .05.i: BE 
EP .05,-1: NEXT i 

2040 PRINT ....TAB (4): FLASH i: IN 
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K is" Istu vazu kao rnenu !" 

2@50 FOR t=i TO 10 

206© BEEP ,©55.t: BEEP ,15,-t 

207© NEXT t 

2080 STOP 

P090 REM % * % Co m m3 n d * Ha n d 1 i n q * t % 

2100 LET dv=@; LET t=0 

2110 LET LET f$=c$( TO 3) 

2120 FOR t=l TO LEM c$: IF c$(t TO t 
) — " THEN LET g$=c$(t+i TO ?! LET 

t=LEN (c$)! NEXT t * ■ 

2125 NEXT t 

2130 FOR t=*l TO 97 STEP 3: IF d$(t T 
0 t+2>*f$ THEN LET n=INT <(t+2)/3)» 
LET t=97! NEXT t! GO TO 2140 
2135 NEXT t: PRINT ,"Z3.htevate: ":c 
$: PRINT Ma to ne mogu ?" s GO TO 50 
2140 IF THEN LET g$=" G 

0 TO 2150 

2142 IF LEN g$<4 THEM LET g$=g$+" 

2145 FOR t=i TO 28: IF z*(t)=g*( TO 
4) THEN LET dv=t: LET t=28: NEXT t 

2146 NEXT t 

2150 IF dv=0 THEN LET dv=3@ 

2160 RETURN 

2170 REM #Data/Initia1isation %% 

2180 RESTORE 

2190 DIM r$ (37,87): DIM o$(30.35>: D 
IM o(30): DIM r(37.4): DIM z$(30.4): 
DIM h$(9,20): DIM h(9>i DIM b<37.4) 
2200 FOR t=l TO 37: READ r$( t): NEXT 
+ 
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ilMI Ir unr 

2210 FOR t=l TO 30! READ 0#(t)l READ 
dCt )i NEXT t 

£220 FOR t*l TO 3@! READ z*(t)l NEXT 
t 

2230 FOR x-i TO 37 

2240 FOR y=i TO At READ f(x,y)i NEXT 
v; NEXT x 

2241 RESTORE 2320 

2250 FOR t=l TO 9? READ h$(t)i READ 
hCt)I NEXT t 

2260 DATA "u svojoj spavacoj sobi"," 
u sestrinoj spavacoj sobi",, "U spavac 
oj sobi vasih roditelj a""u kupatilu 
11 , " n a. odmo r i stu"" na odmo r i stu">" na. 
stsPenicama" 

2270 DATA "u holy". "u hold ", "u kuhin 
j i 11 , "u kabinstu","u trpsZSirU i",!'U d 
nevnd.i sobi" 

2280 DATA "u dvoristu","u sredini b 
aste" # "u vaso.i' ulici", "u ulici", "u i 
redini • IdkSlfidi parks." 

2290 DATA "u maloj novinskoj agsncij 
i","Pored postanskog sanduceta","na 
maloj stazi", "pored glavns casts" , "n 
esto dalja niz glavhu.cestuV'na aut 
ebuskoj stanici"."u autqbusu, na sle ] 
deco.i • stanidi" 

2300 DATA "u autobusu» na stanici"," 
na krajnjoj stanic.i, autobus ja Otis 
ao, vi sire’u centru". "u i avnoj kudi" 
,"u butiku, razgledate.." 

2310 DATA "y ; sarriOPosluzi" ? "U maloj g 
rncarskoj radnj i", "u gvozdj ajfi", "na 
parkingu","u krdmi 'Grveni lav'","U 
stanici milieus","na arid Visoki u 
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lice", "u kucici za pss, pri.jatel ju! ! 


2320 DATA "novae", 1*“Place razbacane 
pd Podu",2."gumenu patku",4,"ka1 end 
ar”,6,"ooruku 25 vas",9,"gomilu tlas 
a", 10."kikiriki i semenke svuda po P 
odu", 12, "Slomljenu maminu vazu",13," 
krPe i cetke",14 

2330 DATA "petoparac".16,"kisobran", 
23."vaseg drugs Acu",22,"si1edzij u P 
et ra", 21." Tubu 1 epka", 29," ogl asnu ta 
blu".19."mi1icionera",35 
234® DATA "metlu",32,"tubu univerzal 
noa lepka".32."sanduk vina",34,"sok 
od porno ran dz e", 34," dz i n i ton i k", 34, 

“bocu votke",34,"novu jaknu",29 
2350 DATA "par cipela”,29."potkosulj 
u", 29. "novu vazu" ,31,"zgodnu devo.j ku 
",28."dedln casovnik".8."".102,"nist 
a",102 

2360 DAT A "nova"," p 1oc","patk","ka1e 
","poru","bate","kiki","slom","krpe" 
,"peto","kiso". " acu","petr", "Isps" , 
"ogla"."mill" 

2370 DATA "rnetl", "univ", "vino", "oran 
", "dzin". "votk", ",iakn", "cipe", "potk" 
,"novu","devo","case","","nist" 

2380 DATA 2.3.0.0.0.1.0.0.0.6.4,0,0, 
0,0,3 

2390 DATA 1,0,6,0,3.7=0,5,6.8,0.0.7. 
16.9,10 

2400 DATA 0.0,13.8.12,0,8,11,12,0,10 
,0,0.11,10.13 

2410 DATA 14.9,12,0.15.13,0.0,20,14, 
0,0.0,0,17,8 
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2420 DATA 22.18.0,15.17,19.20,0,13,0 
.0,0.21,0,15,18,23,20,0,0,0,17,23,0. 
0,21,24,22 

2430 DATA 0,0.0,23,0.0.0,0,0,0,0,0.2 
,8,36, 0 , 0 

2440 DAT A 0,27,0.0,0,0,30,0,30,31.0, 
29-30,32,0,34 

2450 DATA 31,0,0,33,34.0.32.35,0,33, 
31,36,36, 0 ,33, % ,27,35,34, 0 , 0 , 0 , 0 , 0 
2460 LET d$s"uzmbacocipocabubezbezub 
iudapacpomsavcskkuprecpi+ p roispzalpr 
i lePotvzatPoginvl is.i ebxxxsodarsubiun 
i ist" 

2470 LET b$="Autobus je otisao, Bio 
je to jedin nacin da odete u grad, D 
o sledeceg autobusa ima joe citav sa. 
t" 

2480 DATA "Kupanje je super",4,"Prvo 
uzmi poruku",9."Juzno da biste izas 
li'\ 8 ,"Gdmorite mala",24,"Smirite se 
i cskajte",25,"Setits se Bontona",2 
8 ." Nemo j te oobed i t i ma.i stora", 21 
2490 DATA "Pitajte kako da odete kuc 
i", 34, "Pi ta.i te kako da odete kuci", 3 
5 

2500 REM **Choose#Yaur# 8 tatus## 

2510 CLS 

2520 PRINT ! PRINT "Pre no sto pocne 
te morate donetijednu odluku."s PRIM 
T 

2530 INPUT "Ko.ii nivo (2-8)" j Iv 
2535 PRINT " 

2540 IF lv<2 OR lv >8 THEN GO TO 253 
0 
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2550 LET lv-lv*20 
2560 PAUSE 0 
2570 CIS 

2580 PRINT MM “ Probudili ate se 
u ponedeljak. Nemate po.ima kolikd je 
sati" 

2590 PRINT if !l Morate se obuci, to 
i cin its,na brzinu...Zasto? Ni sami 
ns zhate a.li osecate da se 11 hoc 
nesto desi1o<.," 

2600 FOR t=i TO 500! IF INK£Y$<>"" T 
HEN LET t~500? NEXT t 
2605 NEXT t 

2610 PRINT ..." Obukli ate se. nedost 
ajii varn sarno cioele i kaeut 
(U kuci is sveze)" 

2620 PRINT Mozete izabratis" 

2630 PRINT FLASH 1!1"! FLASH 0!") 
Crnu koznu iaknu i cizme sa klin 
c irna" 

2640 PRINT FLASH li"2"! FLASH 0;") 
Trenerku i oatike" 

2650 PRINT FLASH 1.! "3"; FLASH 0!") 
Jaknu od nae# i na.ibolje cioe 

Is" 

2660 INPUT "Izaberite 1.2 ill 3 ?".fc 
f! IF cf<i OR cf>3 THEN SO TO 2660 
2670 PRINT " 

2680 PRINT , . , , "Dobro. Sida rfiozete P 
oceti"! FOR t=i TO 30 STEP .5! BEEP 
.0015.t! NEXT t! RETURN 
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Programirajie 
svoje avanlure 


Ukoliko uzivate ligrajuci se avantura, postoje sasvirn 
dobri iizgiledi da uvecate zadovoljstvo pisuci igire po sop- 
stvenoj zamisli. Osmiisljavanje sopstvene avanture nije 
toliiko tesko koliko izgleda na pnvii pogled. Kada budete 
napisali svojih prvih nekoliko igara shvaticete kolika je 
to pro svega zabava. 

Za pocetak, dozvolite mi da ukazem na razliku koja 
postojii izmedu igara avantura i drugih igara. Po mom 
misljenj'U igre avantiure se sastoje iz sledecih elemenata: 

1) Mesta desavamja radnje. 

2) Obicno, neke vrste logicke veze sa mestom de- 
savanja radnje (madia, ta »iogika« povremeno nije sa- 
vrsena). 

3) iNagrade ili cilja kome treba teziti: izlaza koji 
treba naci iii blaga koje treba saikiupiti. Bez orijentira, 
igra bi tizgubila svnbu i (postala zamorna. 

4) Rrepreka koje sputavaju igraca. 

5) Otkrica ■—■ pronaci carobnjaka, izlaz, kako po- 
krenuti likove i slicno. 

6) Komandi uz 6iju pomoc se ligraci upravljaju u 
prostoru gde se radnja desava li time ucestvuju u samoj 
igri. 

Pre nego sto uopste pristupite pisamju odredenog 
prograima morate imaiti u viidlu nekoliko stvari. Neopho- 
dan je zaplet kao i opis mesta desavanja radnje, likova, 
predmeta i veza izmedu svih pobrojanih elemenata. Pre- 
porucujem vam dia nadete resenje za sve prepreke, zago- 
netke ii veze u okvi.ru zamisljenog prostora. Ovi podaci 
bide vam od pornooi pri pisanju programa, i sto je jos 
vazinije, pri resavanju problema u toku igre. 

Pocnimo sa zapletom. Za ovo ce biti potreban sce¬ 
nario, neka vrsta ciIja, kao i nekoliko vedih prepreka. 
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Zaplet je lako naci, u potrazi za zlatom, u trazenju izlaza 
iz lavirinta, Mi pak u oslobadanju zacarane princeze. 
Smisljaoje novih zaplet a cini se tesikim, ali to samo do^ 
primosi daljem napretku igre. Moglo bi da postane veoma 
zamarajube, ukolko, nadnetii nad ekran svogi monitora, 
pokusavamo da iznesemo blago ;iz jednog te is.tog zamka 
cuvanoig od strane jedne te iste nemami. O'no sto je vasojj 
prici potrebnov je nesto novo oli u najimanju nuku nesva- 
kidasnje. »Kvar«, igra avantura koja se odvija u unu- 
trasnjosti iracunara je priimer takvog zapleta. 

Cilj i scenario ili sred'iina u kojoj se odvija radnja 
su usko povezani. Smislivsi prvi, jednostavno je odreditii 
niaredne. Ako se odlucite za podmorske avanture, ociito 
je da vas cilj mora biti potraga za potopljenom galijom. 
SMcno tome, ako odaberete put kroz lav'irint, vas sce¬ 
nario ce biti pun mitoloskih bogova ii minotaura, Sledii 
nekoliko predloga mogiucih scenarija: 

Usamljeno Pretrpeli ste brodolom i morate pronaci 

ostrvo naciim kako da se lizbavite sa ostrva. 

Poslovna Vi ste tajoi agent i u potrazi ste za pover- 

zgnada I jivi m dokuimentima. 

Ljudsko Vi ste anti'teio i vas zadatak je da utvrdite 

telo izvor infekcije i da ga u kratkom roku 

unistite. 

Sablasna Sa nekoliko prijatelja, zeljm zafoave, kre- 
kuca nuli ste u ispitivanje napustene kuce. Si- 

tuacija postaje sve opasnija. Pred vama je 
pitanje: »Koje sve tajne krije sablasna 
kuca?« 

Pariament Mozete li pronaci vladin izvestaj, koji je 
negde nestao, pre novinara. Vas dalji na- 
predak u kabinetu zavisice od uspeha ove 
misije. 

Londonski Gomile pacova napustile su kanalizaci ju i 

metro naseliile tunele metroa. Mozete li ih uni- 

stiti pre nego sto ponovo naipadnu? 
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Kada jednom pocnete da se bavite programiranjem, 
shvaticete da su mogiucnosti jedimo ogranicene vasom 
rnastom. Zasto re biste avanturu lociral.i u vasoj sopstve- 
noj kuci, sa ciljem kako lizbeci veliko ispremainje. Prona- 
lazenje dobrog zapieta inije tako tesko, a interesantan 
zapleit samo ce va i m pornoci da vasa igra avantiura dobije 
na kvalitetu. 

Smislivsi zaplet, jednostavno je odrediti imena ii 
opis mesta gde se radnja desava. Neki od njih moraju 
biti specific™ i tesno povezani sa zapletom (na primer 
u scenariju »Ljudsko telo« sva mesta moraju biti delovi 
ljudskog tela). Medutim, vecina igara ava»ntura se odi- 
grava u prostoru koji ne zahteva toliko specificna obe- 
lezja. Mesto desa.van'ja radnje daje avanturi element rea- 
lizma; na primer u scenariju »Parlament«, kretanje iz 
glavne dvorane Donjeg doma pravo u poslanicki klub 
ili biblioteku, dovesce do osiromasenja »realizma'« avan- 
ture, jer necemo imati na raspolaganju dovoljno naziva 
da imenujemo sve prostorije kroz koje treba- proci. Ako 
upotrebiimo hod'nike, male pomocne prostorije, mracne 
nise, vetru izlozena unutrasnja dvorista 'i salu za sedn'ice, 
bicO to sasvim dovol j an materijal za avanturu. 

Opis mesta desavarija radnje je stvar licnog ukusa. 
Ja nisam priistailica opsirnih opisa. Memoriju racunara 
treba cuvati za unosenje sto veceg broja mesta radnjii ili 
sto mastovitijih zagonetki. Medutim, poznajem i takve 
osobe koje najvise uzivaju u programiiranju ,i najsitnijih 
detalja lokacije gde se radnja avaoture z'biva. Ukoliko se 
ipak odlucite da pribegnete dugim opisima, nije na od- 
met da imaite skracenu verziju, koju mozete ustampati 
nakon sto se ligrac upozna sa d'uzom verzijom. Ovakvim 
postupkom igra 1 dobija na zanimljivosti, jer korisnik 
uvek ponovo moze da se podseti duze verzije, izdajuci 
komaindu LOOK. 

Liikovi i predmeti u mojim igrama prikazani su na 
jedinstven nadin, jer se i priiikom programirainja koristi 
jediinstvena metodologija. Ocigledno je da ce vas zaplet 
odirediiti broj likova ii predmeta, ali vi taj broj mozete 
uvecati, da bi komplikovali radinju ili pomogli igracu u 




naporu da ostvami cilj igre. Mada> mogu da zamislim 
igre avanture bez likova, sviim igrama su neophodni 
predmeti neke vrste. Predmeti >i likovi su u cvrstoj vezi 
sa zagonetkama u avanturi. 

U igri avainturi zaplet i zagonetka su dva najvaznija 
elementa koja treba razmotriti. I u ovom. slucaju mo 
zemo red da najveoi broj zagonetki proizilazi iz zapleta, 
ali ocito je da ce nam biti poitrebne i dodatne zagonetke 
da bismo upotpunili avamturu. Zagonetke mozemo svr- 
stati u tr.i ka-tegorije. Prvoj pripadaju zagonetke koje su 
u diraktnoj vezi sa zapletom i moraju biti resene pre 
zavrsetlka igre. Druga kategorija zagonetki rtfje.u direkt- 
noj vezi sa zapletom, ailii i u njihovom slucaju vazi da 
moraju biti resene u toku igre. Treca vrsta zagonetki ne 
mora biti resana u toku iigre, ali to neresavanje, ma ko- 
liko cinilo igru zabavnijom, usporava igraca, koji nije 
svestan nevaznosti 'nj'ihovog resavanja. Navescemo 1 neko- 
liko primera za prva dva tipa zagonetki: 


Moraju biti resene 

1) Zamak je mracan i bez baklje, jos uvek mozete 
da se krecete naokolo, ali nemate precizan opis prostora. 

2) Potrebain vaim je pistolj da biste prosli pored 
strazara na ulazu. Morate se cenjkatii sa trgovcem u selu. 

3) Razbili ste vazu u kancelariji i da biste krhotine 
neopazeno iznel.i napolje potrebain vam je lepak. 

4) Vrata n'isu zaiklj-ucana, ali su za vas suvise teska 
da iib Otvorite. Od drveta su i veliiki h diimenzija. 

5) Rnibliizavate se dubokom kanjonu, ne mozete se 
spostitii, a otpozadi vam se priblizava krdto. pobesnele 
stoke. Jedino cime raspolazete su neogranicene kolicine 
tankog uzeta. Sta cete uciniti? 

Ukoliko ste jedain od onih kojii uzivaiju u zagonet¬ 
kama sa »iscasenom Iogiikom« modi cete da resite i taj 
posledinji problem. Resenje je da ispumite kanjon sa uze- 
tom, predetie na drugu stranu i farzo namotate uze i time 
ispraznite kanjon. 
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Za avamturu je potrebno nekoliko teze resivih pro¬ 
blems, koje je i nuzno dopumiti sa nekoliiko smicalica, od 
kojih predlazemo nekoliiko sledecih primera: 

1) Nosec i baklju spazite deciju hemijsku laborato- 
riju. Ako ligrac na bilo koji macirn stupi u dodir sa labo- 
ratorijom bakija 6e zaipaliti lalboratorijiu i igra ce biti 
pom is ten a. 

2) Da li vam je od neke koristi gumena patka? 
Kada odigrate jednu »ludu« ignu kao sto je »Pimania« 
bice vam sve jasno. 

3) Gnimizna riba (ovo je suvise ocigledno da bi se 
opisalo 1 !) 

Postoje i saisvim jedmostavne zagonetke koje mogu 
da se pnimene u vasoj igni, kao sto su: zatarabljena 
vrata ili fudovista na vasem putu. Siguran sam da su 
vam sve te zagonetke poznate. 

Bice neoiphodino da inapravite »plan« vase igre sa 
ucrtanim vezama 'izmedu mesta gde se radnja desava, 
raspoiredom predmeta i slicno. U vecini 'igara kao uiput- 
stvo za kretanje koniste se oznaike koje obelezavaju 
sframe sveta S (North), J (South), I (East) i Z (West) 
uz eventualni dodatalk Gore (Up) i Dole (Down). Ta- 
kode, mozete upotrebiti ii sledece cetiri oznake SI (NE), 
SZ (iNW), Jl (SE) ii JZ (SW) ili pak odabrati drugaciji 
sistem. Moracete >i da odredite trasu kretamja od jedne 
tacke do druge. Mcguca je primena razlicitih metoda u 
rasponu od sistema sa jedlnostavnim rasterom do sloze- 
nih sistema, koji dopustaiju moguonost kretamja u 16 
razlicitih pravaca (ukljucujuci i kretanje kroz vreme!). 

Kada ste jednom to sve stiavili na papir, mozete 
preci na samo program i ran je. Kao u slucaju svih igara, 
moralte obratiiti paznju na sledece detalje. Kod ispisiva- 
nja teksta na ekraimu, vodite racuna da red zavrsite sa 
celovitom reci, bez razdvajanja. Ponekad dodajte po koji 
zvucni efekat ii likovno obelezje, all gledajte da to bude 
u vezi sa igrom: na primer, ako neko od vasih likova 
puca iz pistolja, dodajte cdgovanajuci zvucni efekat, ili 
aiko usmrti oudoviste ukljucite crvenu boju. Detalji kao 
sto su ovi mogu samo doprineti zanimljivosti igre. 
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Graficki prikazi mesta desavanja radnje su dobri 
samo ukoliko se brzo smenjuju na ekranu, jer nista nije 
tako dosadno kao cekanje na ekran da se ispuni slikom. 
Korisnik ce se ubrzo zamoriti bez obzira na graficki kva- 
litet si,ike. 

I konacno, nekoliko reci o struktuiranju programa 
vase igre. Moze se postaviti pitanje cemu to? Odgovor 
je da za to postoji nekoliko dobrih razloga. Posto se za 
BASIC ne bi moglo reci da pnipada kategoriji jezika sa 
razviijenom strukturom, kao sto je to FORTH, programer 
ce morati da da i svoj doprinos. Struktuiranjem pro¬ 
gram dobija na brzini, i ujedno se sprecavajda elektron- 
ski impulsi lutaju po perifernim delovima programa. 
Struktuiranjem se takode izbegava dupliranje program- 
skih fu-nkcija 'i ouva memonijski kapacitet za neike koris- 
nije sadrzaje. 

Jos jed ( an argument u korist struktuiranja progra¬ 
ma — posle mekoliko dama desice vam se da zaboravite 
rutinske pokrete u igri. Struktuiranjem programa pisac 
awainture ce u svakom trenutku znati kako i u kom tre- 
nutku treba preduzeti neku radnju, sto ce mu pomoci 
pri savladivanju smetnjii u toku igre. 

Posle svega, mislim da cete se sloziti sa mnom da 
pisainje programa i nije tako jednostavno, rnada i dalje 
ostaje u granicama moguonosti prosecnog korisnika ra- 
cunara. Naj idea Ini j i nacin ucenja za pocetnika je da na- 
pise nekoliiko jednostavnih programa. Avanture, bilo da 
ih pisete ili ih igrate, uvek su zabavne. 
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Recnik 


A 

Akumulator (Accumulator) — deo unutrasnjosti racunara u 
kome se obavljaju aritmeticke operacije i gde se tako do- 
bijeni rezultati pohranjuju. 

Algoritam (Algorithm) — niz pojedinacnih operacija, koje »ko- 
rak po korak« vode resavanju postavljenog problema. 

Aifanumerik (Alphanumeric) —• ovaj izraz se uobicajeno upo- 
trebljava u vezi sa tastaiturom racunara — kao »alfanu- 
mericka tastatura« u smislu da tastatura pored slova sa- 
drzi i brojeve. Takode, ovim izrazom se i precizira tip 
tastature, odnosno seta slova i brojeva (character set), 
koji mogu biti stampani na ekranu monitora. 

Arif met icko-logicka jedinica (ALU, Arithmetic/Logic Unit) — 
deo racunara koji vrsi aritmeticke radnje (kao sto su sa- 
biranje, oduzimanje) i donosi odluke. 

AND — Bui ova logicka operacija koju racunar. koristi u pro- 
cesu donoSenja odluka. Ova operacija se zasniva na Bulo- 
voj algebri, sistemu postavljenom od strane matematicara 
Dzordza Buia (1815—1864). Po Bulovoj algebri promen- 
Ijive velicine jedne vrednosti predstavljaju logicku opera- 
ciju, kao sto su OR ili 1 NOR. 

ASCII (American Standard Code for Information Exchange) — 
odnosi se na Americki standardni kod za prenos informa- 
cija, kao najrasprostranjeniji sistem kodiranja alfanume- 
rika engleskog jezika. 

Asembler (Assembler) — je program koji druge programe pi- 
sane na asembler jeziku prevodi u masinske naredbe. 
Asembler je tip nizeg programskog jezika, koji se koristi 
lako pamtljivim kombinacijama od 2—3 slovna znaka, 
koji predstavl jaju odredenu naredbu, koju potom asem¬ 
bler prevodi, tako da racunar takvu naredbu moze da 
»razume«. Primeri za to su ADD (add) i SUB (subtract). 
Racunar programiran na asembler jeziku radice mnogo 
vecom brzinom nego onaj programiran na jeziku viseg 
tipa, kao sto je BASIC. 
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RECNIK 


B 

Bejzik (BASIC, Beginners All-Purpose Symbolic Instruction 
Code) — je visi programski jezik koji je u najcescoj upo- 
trebi u oblasti mikroracunara. Bez obzira sto trpi kritike 
sa raznih strana njegova pogodnost lezi u tome sto ga ko- 
risnik moze veoma lako nauciti. Najveci broj BASIC pro- 
grama slican je standardnom engleskom jeziku. 

Bod (Baud) — dobio ime po Bodou, zacetn’iku telegrafskih veza. 
Bod oznacava jedinicu brzine prenosa informacija i okvir- 
no iznosi jedan bit u sekundi. 

BCD — skracenica za Binary Coded Decimal. 

Bencmark (Benchmark) — je test pomocu kojeg se vrsi pro- 
vera odredenih funkcija racunara. Postoji ffedan broj tzv. 
»Standardnih Bencmark testova«, ail kod vecine se njima 
meri samo brzina. Brzina je karakteristika za koju poten- 
cijalni kupac racunara pokazuje najmanje interesovanje. 

Binarni sistem (Binary) — je numericki sistem koji koristi 
samo 0 i 1. 

Bit (Bit) — je skracenica od Binary Digit. Bit je najmanja je- 
dinica informacije koju elektronsko kolo racunara moze 
da »raspozna«. 

Bulova algebra (Boolean Algebra) — je sistem algebre u kome 
se algebarski sistem znakova koristi radi iskazivanja lo- 
gickih veza (vidi odeljak AND). 

Butstrap (Bootstrap) — je kraci program koji se ucitava u ra- 
cunar odmah pri pustanju racunara u rad. Njime se po- 
deSava rafiunar pre prijema narednog duzeg programa. 

Bag (Bug) — je pogreska u programs koja sprecava dalji pra- 
vilan rad radunara. lako se ovaj iskaz najcesce upotreb- 
Ijava u smislu greske ili nedostatka u programu, on, ta- 
kode, moze oznacavati i nedostatak u hardveru racunara. 

Bas (BUS) — je skup brojeva za prenos impulsa, kao sto su 
informacijske instrukcije ili snaga ulaza i izlaza. 

Bajt (Byte) — je skup binarnih simbola koji obrazuju »kom- 
pjutersku rec«. Najcesce je u upotrebi bajt sa 8 bitova. 


CAI — skracenica za Computer Assisted Instruction. 

CAL (Computer Assisted Learning) — generalno izraz se odnosi 
na programe koji uvode korisn'ika u proces ucenja. 

Centralni procesor (CPU — Central Processing Unit) — je sre- 
diste inteligencije racunara, gde se obraduju podaci i iz- 
vrsavaju uputstva. 


101 




AVANTURE ZA VAS 
ZX SPECTRUM 


C 

Cip (Chip) — u najsirem smislu cip je celovito eiektronsko 
ko'lo urezano u siilikonsku osnovu mikro dimenzija. U sva- 
kom slucaju cip je »srce« centralnog procesora. 

D 

Digitaini racunar (Digital Computer) — racunar koji funkcio- 
nise na osnovu podataka datih u kompaktnoj form). 

Disketa (Disk/Disc) — je plasticni disk sa namagnetisanom 
gornjom povrsinom, nesto manjeg precn'ika od standardne 
singl gramofonske ploce. Koristi se za cuvanje programa i 
podataka. Diskete se mnogo brze pune programom, od- 
nosno podaoima nego kasete sa istom duzinom programa. 
Njih je lakse pretraziti za dobijanje podataka za dalji tok 
programa. 

Dinamicka memorija (Dynamic Memory) — je memorijska je- 
dinica ciji se sadrzaj brise kada se racunar iskljuci iz rada. 

Datoteke (File) — je skup podataka organizovan na sistemati- 
can nacin. 

Dijagram toka (Flow Chart) — je osnovni nacrt napravljen pre 
programiranja, u kome su glavne operacije postavljene 
unutar kvadrata ili drugih oblika i povezane linijama sa 
strelicama, cineci tako razgranatu mrezu uputstava i mo- 
gucih resenja. Ovakav postupak olaksava programiranje, 
jer se klopke, kao sto su nebrojana uputstva Ili nedefini- 
sane promenljive velicine, mogu izbeci u pocetnoj fazi. 
Pravljenje ovih planova ne preporucuje se za krace pro- 
grame, ali oni svakako imaju svoju vrednost i mesto pri- 
likom kreiranja programa. 

Druga generacija (Second Generation) — ima dva znacenja. 
Prvo se odnosi na racunare koji koriste tranzistore, za raz- 
liku od prve generacije koja je koristila elektronske cevi. 
Izraz »second generation* moze da znaci i druga kopija 
odredenog programa, tako sto kvalitet opada sa svakom 
narednom generacijom. 


Editor (Editor) •— je izraz koji se obicno upotrebljava za ope¬ 
racije kojima se moze menjati sadrzina programa u toku 
samog programiranja. 

EPROM (Erasable Programmable Read-Only Memory) — je veo- 
ma sl'ican ROM-u sa tom razlikom sto je mnogo pogodniji 
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za unosenje materijala i njegov sadrzaj se ne gubi prilikom 
prestanka rada racunara. EPROM moze biti izlozen jakom 
ultraljubicastom zracenju da bi doslo do brisanja njegove 


F 

Firmver (Firmware) — racunar sadrzi tri osnovne strukturalne 
komponente: softver sa programima koji se menjaju; 
hardver koji slicno ROM-u ima nepromenljive informacije 
i firmver slican EPROM-u sa relativno trajnim informaci- 
jama (vidi EPROM). 

Flip-Flop (Flip-Flop) — je kolo koje odrzava jedno elektricno 
stanje (0 i'li 1 ), dok pod uticajem ulaznog signala ne 
prede u drugo. 

FORTRAN —• je skracenica za FORmula TRANslation, odnosno 
visi programski jezik namenjen resavanju problema iz 
oblasti nauke i matematike. 

Flopni disk (Floppy Disk) — je relativno jevtina magnetna d'is- 
keta namenjena cuvanju podataka, a naziv joj potice od 
njene fleksibilnosti (vidi Disk/Disc). 

G 

Gejt (Gate) — je elektricno kolo koje je sposobno da primi 
vise a da emituje samo jedan signal. 

Grafik (Graphics) — je ilustrativna informacija za razliku od 
slovnih i numerickih. 


H 

Hard kopi (Hard Copy) — je finalni rezultat rada racunara dat 
u trajnom materijalnom obl'iku. 

Hardver (Hardware) — je fizicki deo racunara (vidi softver i 
firmver). 

Heksadecimal (Hexadecimal, Hex) — je numericki sistem sa 
osnovom 16. Cifre od 0 do 9 su u upotrebi, kao i slova 
A, B, C, D, E i F, koja takode imaju numericku vrednost. 
A=10, B=ll, C=12 itd. Korisnici mikroracunara naj- 
cesce upotrebijavaju Hex. 

Heks Pad (Hex Pad) — je tastatura posebno dizajnirana za- 
heksadecimalne simbole. 
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AVANTURE ZA VAS 
ZX SPECTRUM 


Instrukcija (Instruction) — podaci kojima se upravlja proce- 
som obrade informacija »korak po korak«. U upotrebi je 
i izraz »komanda«. 

Integrisano kolo (Integrated circuit) — je kompletno, slozeno 
elektronsko kolo urezano u povrsinu poluprovodnika. 

Interfejs (Interface) — je umetak koji sluzi kao spona izmedu 
racunara i perifernih jedinica kao sto je stampac. 

interpreter (Interpreter) •— je program koji visi programski 
jezik prevodi na govor koji racunar moze »razumeti«. 

Invertor (Invertor) — je logicka jedinica koja ulazni signal 
jedne binarne vrednosti pretvara u suprotnu vrednost pri 
izlazu. 

Interaktivna rutina (Interactive Routine) —■ je deo programa 
koji se ponavlja dok se ne ostvare odredeni uslovi. 

Izlaz (Output) — su informacije il’i podaci koji izlaze iz racu¬ 
nara preko stampaca, ekrana ili kasete. U outputu su sa- 
drzane informacije kao rezultat celokupnog prethodnog 
procesa programiranja. 


Jezik (Language) — kompjuterski jezici se dele na tri grupe: 
visi programski jezici, kao sto je BASIC, koji su relativno 
najslicniji engleskom jeziku i. najjednostavniji za upotrebu; 
nizi programski jezici, kao sto je Asembler, gde su u upo¬ 
trebi skraceni izrazi koji imaju nekih dodirnih tacaka sa 
engleskim jezikom (npr. ADD za add-sabiranje i RET za 
return-vracanje) i masinski jezik namenjen vise ili manje 
za direktan rad sa racunarom. 

K 

Kobol (COBOL, Common Business Orientated Language) — je 
viSi programski jezik prevashodno namenjen za prijem i 
cuvanje podataka iz oblasti finansija i poslovanja. 

Komparator (Comparator) — je uredaj pomocu koga se vrsi 
uporedivanje dve pojave i proizvodi impuls baziran na 
njihovoj razlicitosti. 

Komplement (Complement) — je broj izveden iz drugog broja 
po odredenim pravilima. 

K — je kapacitet memorije racunara. Jedinicu kapaciteta me- 
morije cine 4 K bloka, s tim da 1 K ima 1.024 bajta. 
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Kljucna rec (Keyword.) ,— je kljucna rec u: programskom nizu 
i obicno je to prva rec posle rednog broja. Primeri kljuc- 
nih reci su: STOP, PRINT i GOTO. 


LCD — je skracenica za Liquid Crystal Diode. Neki racunari kao 
sto je TRS-80 dzepni racunar koriste LCD displej. 

LED — je skracenica Light Emitting Diode. Jarko crvene brojke 
koje pokazuju vreme na displeju su primer za upotrebu 
LED-a. 

Logicki (Logic) — je matematicki iskaz o odnosima izmedu 
pojava. ■ 


M 

Matricni stampac (Dot Matrix Printer) — je stampac koji 
stampa spisak mogucih programa ili ono sto se pojavljuje 
na ekranu. Svaki slovni znak ili simbol se sastoji od odre- 
denog broja tacaka (dots). Sto simbol sadrzi vile tacaka 
to stampac ima bolju rezoluciju. 

Masinski jezik ili masinski kod (Machine Language or Machine 
Code) ■— je programski; jezik koji racunar moze direktno 
da primi i da po njemu postupa. 

Magnetni disk (Magnetic Disc) — vidi Disk i Floppy Disk. 

Mejnfrejm (Mainframe) — najcesca podela racunara je na tri 
grupe, i u koju ce grupu racunar uci zavisice manje ili 
vise od njegove fizicke velicine i kapaciteta. Racunar koji 
vi zelite da kupite je mikroracunar; za racunare srednje 
velicine i kapaciteta u upotrebi je izraz miniralunar; a 
dzinovski racunari koje povremeno vidate u filmovima 
naucne fantastike nose naziv mejnfrejm racunari. Do pre 
petnaestak godina, prakticno jedino su oyi dzinovski' racu¬ 
nari bili na raspolaganju. 

Memorija (Memory) — racunar ima dve vrste memorije. Prva 
nosi naziv ROM (read-only memory). Ovo je memorija 
koju racuna'r vec sadrzi u sebi, i koja pomaze racunaru 
da izvrsava komande i resava aritmeticke operacije. I ski j u- 
cenjem racunara ROM se ne brise. Druga vrsta memorije 
je RAM (random access memory). Ona cuva program koji 
unosite preko tastature, kasete iii diskete. Kod vecine ra¬ 
cunara prilikom iskljucenja doiazi do brisanja RAM-a. 

Mikroprocesor (Microprocessor) — je glavni deo svakbg racu-- 
nara. Za rad mikroprocesora neophodne su veze sa peri- 
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fernim jedinicama, kao sto su na primer izvor energije i 
Input/output uredaj. 

Modem (MODEM, Modulator Demodulator) — je uredaj koji 
omogucava da dva racunara medu sobom komuniciraju 
preko telefonske veze. Na telu racunara nalazi se posebno 
leziste u koje se postavlja telefonska slusalica. 

Monitor (Monitor) —- izraz monitor ima dva znacenja u zar- 
gonu racunara. Jedno je da je monitor ekran slican tele- 
vizijskom ekranu. lako monitor ne moze da prima televi- 
zijske signale, kvalitet vizuelne reprodukcije na monitoru 
je veci nego na televizijskom ekranu. Drugo znacenje je u 
vezi sa ROM-om. Naime, monitor moze bit'i i osnovna in- 
formaciona podloga, koju racunar sadrzi vec prilikom ku- 
povine i koja omogucava racunaru da izvrsava komande 
i resava aritmeticke operacije. 

Maderbord (Motherboard) — je spoljaSnji fizicki okvir racu¬ 
nara na koji se mogu prikljuciti dodatni elementi. Ovi do- 
datni elementi uvecavaju izvorne mogucnosti racunara; 
priimer za to je uredaj za proizvodenje zvuka ili uredaj za 
kontrolu lajt pena (light pen). 

MPU — je skrafer.ica od Microprocessor Unit. 

N 

Nanosekunda (Nano-second) — je jedinica brzine i meri mUi- 
jarditi deo sekunde, u kojim okvirima se meri trajanje 
operadija racunara ili memorijskog cipa. 

Non volatl memorija (Non-Volatile Memory) — je memorija 
koja se ne gubi prilikom iskljucenja racunara. Neki od 
manjih raSunara, kao sto je TRS-80 dzepni racunar pose- 
duje ovu memoriju, tako da baterije odrzavaju uneti pro¬ 
gram i nekoliko stotina sati. 

Negacija (Not) — je Bulova logicka operadija kojom se binarni 
broj pretvara u svoj suprotni korelat. 

Nula niz (Null String) ■— je niz koji ne sadrzi nikakve znakove. 
U prograimu je oznacen sa dva para znaka navoda sa praz- 
ninom izmedu. 

Numerik (Numeric) — se odnosi na brojke za razliku od alt 
betika (alphabetic) koji se odnosi na slova. NajceSce se 
tastatura opisu^e UjO alfanumericka, sto podrazumeva da 
sadrzi i slovne i numericke oznake. 

O 

Oktal (Octal) ■— je numericki sistem koji za osnovu ima 
»osam«, odnosno brojeve: 0, 1, 2, 3, 4, 5, 6 i 7. Danas, 
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ovaj sistem nije u sirokoj upotrebi u oblasti mikroracu- 
nara. Najrasprostranjeniji je heksadecimalni sistem (vidi 
Hexadecimal). 

Operativni sistem (Operating System) — je opst'i naziv za soft- 
ver koji omogucava rad programa. 

OR — je aritmeticka operacija »ili« koja Vraca »1«, ako su 
jedna ili vise ulaznih informacija »1«. 

Orakl (Oracle) — je nacin slanja teksta pomocu standardnog 
televizijskog signala. Kod prijema za dekodiranje teletek- 
sta potreban je odgovarajuci uredaj. U Velikoj Britaniji 
ovaj nacin slanja teksta koriste ITS i BBC preko svog 
ogranka »Ceefax«. 

P ' . 

PASCAL — je visi programski jezik. 

Periferija (Peripheral) — je opsti naziv za dodatne delove koji 
se prikljucuju na racunar i koje racunar kontrolise, kao 
sto su diskete, stampac ili sintesajzer glasa. 

Port (Port) — je otvor kroz koji informacije ulaze i izlaze. 

Prestel (Prestel) — je britanski telekom naziv za sistem veze 
sa centralnim racunarom, gde se veza ostvaruje pomocu 
telefona, a rezultat pojavljuje na ekranu. Slicna komer- 
cijalna verzija u SAD je poznata kao »Sors« (The Source). 

Program (Program) — u zargonu racunara termin program ima 
dva znacenja. U okviru prvog, pod programom se podra- 
zumeva lista uputstava koja se unosi u racunar, a u dru- 
gom slucaju ima znacenje glagola (npr. programirati ra¬ 
cunar). 

PROM — je skracenica od Programmable Read Only Memory. 
PROM je memorijski deo koji se moze programirati i jed- 
nom programiran ima trajni sadrzaj (vidi EPROM i ROM). 

Poiuprovodnik (Semiconductor) — je materijai koji u normal- 
nim uslovima ne propusta elektricnu energiju, aii pod od- 
redenim uslovima moze da postane provodnik. 

Potprogram (Subroutine) — je deo programa koji se cesto po- 
ziva za vreme izvrsenja glavnog programa. Subrutina se 
zavrsava instrukcijom za vracanje na red posle reda iz 
koga je pozvana subrutina. 

Promenljiva (Variable) — je slovo Mi kombinacija slova i sim- 
bola, koiu racunar u toku programiranja pripisuje nekoj 
velicini ili' reci. 

Pokazivac (Cursor) — je oznaka koja se pojavljuje na ekranu 
kada je racunar u radu i pokazuje gde ce naredni znak 
da se pojavi. Tastatura -racunara obicno sadrzi skontrolne 
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kljuceve za kursor« uz ciju pomoc korisnik moze da po- 
krece kursor po ekranu. 

Prevodilac (Compiler) — je program koji prevodi visi program- 
ski jezik u binarni masinski kdd »razumljiv« za 'racunar. 

Pcdaci (Data) — podaci u obliku u kojem racunar moze da ih 
obradi. 

Provera programa (Debug) — je opsti izraz za ispitivanje pro- 
grama i otkianjanje svih gresaka, tj. traganje za, i elimi- 
nisanje svih pogreski u programu. 

Prikaz na ekranu (Display) — je vizuelna predstava operacija 
racunara na TV ili ekranu monitora. 

Poruka o greski (Error messages) — je informacija koju racu¬ 
nar slgnalizira tj slucaju pogresnog kodiranja dela progra¬ 
ma, koja se manifestuje tako sto se program zaustavi, a 
pri dnu ekrana se pojavi rec ili ;rec i brojevi ili samo 
kombinacija brojeva. Ovim ste obavesteni kakvu ste gresku 
napravili. Najcesce greske su upotreba slova O umesto 
broja 0, ili izostavljanje u nekom izrazu oba interpunkcij- 
ska znaka za zagradu ill samo jednog od njih, ili pak pro- 
pustanje da se definise promenljiva velicina. 

Petlja (Loop) — je naziv uputstva u programu koji se ponavlja 
sve dok se odredeni uslov ne ispuni. 

Prekoracenje (Overflow) — je broj suvise veliki ili suvise mali 
da bi ga racunaT mogao registrovati. 

Pad (Pad) — vidi Keypad. 


R 

Racunar (Computer) — je uredaj cije su tri osnovne funkcije 
da: 1 — primi informaciju, 2 — resava zadatke problema, 
3 — daje resenja. 

RAM memorija, memorija dostupna za citanje i pisanje (RAM, 
Random Access Memory) — je memorija koja se moze 
menjati voljom korisnika racunara. U najvecem broju slu- 
cajeva sadrzina RAM memorije se brise prilikom isklju- 
cenja racunara. RAM je memorijski deo koji ce primiti i 
program koji unesete i rezultate operacija. 

ROM memorija, memorija dostupna samo za citanje (ROM, 
Read-Only Memory) — nasuprot RAM memoriji, informa- 
cije sadrzane u ROM memoriji ne mogu se menjati voljom 
korisnika i ne brisu se iskljucenjem racunara iz rada. Po¬ 
daci i: informacije ROM memorije uneti su od strane pro- 
izvodaca i upucuju racunar kako da donosi odluke pri iz- 
boru alternativa i kako da obavi aritmeticke proracune. 
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i jedinici K 
- ponavljanje jednog 


Kapacitet ROM i RAM memorije se izrazava 
(vidi K). 

Rekurzija (Recursion) — je konti 
dela programa. 

Registar (Register) — je od redeni deo memorije u kome 

vaju jedna iii vise osnovnih informacija u toku progra- 
minanja. 

Rezervisana rec (Reserved Word) — je rec koju u prograi 
ranju ne smete koristiti kao promenljivu, jer ce je ra^ 
nar drugacije »citati«. Primer je rec »TO« koja za racu- 
nar ima posebno znacenje i vecina je racunara nece pri- 
hvatiti kao promenljivu. Isto vazi i za FOR, GOTO i STOP. 

Rutina (Routine) — je izraz koji se moze upotrebiti kao sino- 
nim za rec program ili pak u znacenju odredenog dela 
programa (vidi Subroutine). 

Rec. (Word) — je skup simbola ili niza binarnih brojeva, i kao 
takav predstavlja jedin’icu informacije, koja zauzima od¬ 
redeni deo memorije. Racunar obraduje rec kao pojedi- 
nacnu instrukciju. 


Stranica (Page) — pod ovim se najcesce podrazumeva ona ko- 
licina informacija potrebna da ispuni TV ekran, tako da 
mozemo govoriti o stranici programa, tj. misli se na kvan- 
tum. podataka koji ce se pojaviti na ekranu u jednom 
trenutku. 

Serijski (Serial) — podaci koji se cuvaju ili prenose u nizovi- 
ma, bit po bit. 

Signal (Signal) — elektricni impuls kojim se prenose podaci i 
informacije. 

Siiikonska Dolina (Silicon Valley) — je popularan naziv za ob¬ 
last u Kaliforniji u kojoj je smesten najveci broj proizvo- 
daca racunara i opreme. 

SNOBOL (SNOBOL) — je visi programski jezik. 

SAT (Clock) — uredaj za vreme u racunaru, koji sinhronizuje 
operacije. 

Softver (Software) — je program unet u racunar od strane ko- 
risnika koji odreduje rad racunara. 

Softverska kompatibilnost (Software Compatible) — se odnosi 
na situaciju u kojoj dva razlicita racunara mogu medu 
sobom da razmene programe pisane za onaj drugi. 

Staticka memorija (Static Memory) — je memorija koja cuva 
informacije dok je racunar u radu, ali kojoj nije potre- 
ban dodatni izvor energije da bi se ocuvala. 
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Teletekst (Teletext) — je informacija koja se prenosi na gor- 
njem delu televizijskog ekrana. Za to je potreban uredaj 
za dekodiranje, kako bi se tekst pojavio na ekranu. U Ve- 
likoj Britaniji ovu vrstu prenosa obavija »Ceefax« za BBC 
i »Oracle« za ITV. Teletekst se moze prenositi i putem 
kabla, kao 5to to cini »Prestel« u Britaniji i »The Source« 
u SAD. 

Teletajp^ (Teletype) — je uredaj slican pisacoj masini, koji 
moze da salje, prima i stampa informacije. 

Terminal (Terminal) — je jedinica nezavisna od centralnog 
procesora. U najsirem smislu, sastoji se od tastature i ka- 
todnog displeja. 

Tajm sering (Time Sharing) — je operacija pomocu koje jedan 
broj korisnika ostvaruje pristup u racunar veceg kapaci- 
teta, brzim prebacivanjem sa jednog na drugog korisnika, 
take da svaki korisnik ima utisak da samo on saobraca sa 
centralnim racunarom. 

Trot tejbl (Truth Table) — je matematicka tablica koja sadrzi 
sve potencijalne ishode Bulove logicke operaeije, pokazu- 
juci rezultate do kojih ste dosli primenjujuci razlicite 
kombinaeije unetih podataka. 

Tekst procesor (Word Processor) — je visoko inteligentna pi- 
saca masina koja omogucava korisniku da manipulise teks- 
tom, da ga pomera u svim pravcima, da ureduje margins 
i, da pomera citave pasuse po potrebi na ekranu, pre upu- 
civanja definitivnog teksta u stampac. Najcesce sadrzi i 
memoriju, tako da standardna pisma 'i tekstovi, prethodno 
pisani, mogu da se ocuvaju. 

U 

U!az (Input) — svi podaci koji se unose u racunar putem 
tastature, mikrofona, kasete ili diskete. 

Uiaz/lzlaz, I/O jedinica (Input/Output, I/O Device) — je ure¬ 
daj koji prima informacije ili uputstva od programera, pre¬ 
nosi ih racunaru i po zavrsenoj obradi dostavlja finalni 
rezultat (hard copy) u odgovarajucoj form! za spoljnu 
upotrebu. 

UHF — je skracenica od Ultra High Frequency (300—3000 
MHz). 

Ultra Vajolet Irejsing (Ultra Violet Erasing) — moraju se upo- 
trebiti ultra!jubicasti zraci da bi se izbrisao EPROM (vidi 
EPROM). 
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Visi programski jezik (High Level Language) — je programski 
jezik koji omogucava korisniku da »razgovara« sa racuna- 
rom, a sam je u manjoj ili vecoj meri slican engleskom 
jeziku. U principu, sto je visi nivo programskog jezika 
(tj. sto je veda slicnost sa engleskim jezikom), to je ra- 
cunaru potrebno vise vremena da ga prevede. Jezici nizeg 
nivoa zahtevaju od programera veci napor, ali su utoliko 
operativniji za racunar. 

VDU —• je skracenica od Visual Display Unit. 

Volatl (Volatile) — se odnosi na memoriju u kojoj dolazi do 
gubitaka sadrzaja u momentu prestanka rada racunara. 
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Za oblast racunara se ne bi ifnoglo reci da obiluje 
javljenim knj'igaima ali se <u poslednje vreme na trzistu 
javlio jedan broj naslova — nekii izvrsnii, drugi osrednji. 
ovom mestu ukazacemo na one bolje.* 

lako se maze desiti da jedan broj «ih knj'iga ra'je pisan 
za vas racunar, one koje cemo pomenuti ili sadrze informa- 
tivinii tekst lili se program* avantura, bez poteskoca, mogu pri- 
lagoditi za vas racunar. 


»KREIRANJE IGARA AVANTURA NA VASEM BBC MIKRO« 
(Creating Adventure Games on Your BBC Micro) 

Ian Watt. Interface/Addison Wesley 

Jan je odist a na svom terenu kada se radi o pisamju 
programa za 'iigre avanture. On poseduje osoben stJil u pisanju 
prograima i u ovoj knjiiai to pokazuje na najbolji nabin. Knjiga 
obuhvata t-ni igire avanture, sve u tekstu, tako da ih je lako 
podesiti i za druge tfpove racunara. 


»KREIRANJE PROGRAMA IGARA AVANTURA NA VASEM 
RACUNARU« 

(Creating Adventure Programs on Your Computer) 

Andrew Nelson. Interface 

I mao sam to zadovoljstvo da i licno upoznam Endrj ua 
kao osobu neiscrpnih lideja, koje je nesebicno bio spremam da 
podel'i saimnom. U ovoj knjizi pronabi cete veci broj igara 
napisamih u Microsoft Basic jeziku, alii to nece taliti prepreka 
da ih koristite ii na vasem racunaru. Posebno vasu paznju 
skrecemo na <igru »Poslediice Asmovfjanske katastrofe« (»The 
Aftermath of the Asmovian Disaster*). 


* Ova foibliograrfija je uradena na osnovu engleskog lizdanija i do- 
punjena je od strame jugoslovenskog izdava'ca prigodnim domadim iz- 
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..PiSANJE AVANTURA« 

(Adventure Writing) 

Aardvark-80, 2352 S, Commerce, Walled Lake 
Ml 48088, USA 

Ova mala knj'izica od svega 16 strama, u prodaji u SAD 
(za pozamasam iznos od 5 $ USA), od tzuzetme je pomoci 
■svima omitna koji zele da se oprobaju u pisaoju programa za 
igre avant'ure. Programii igara, ukljudujudi ii »Ukletii brod« 
(»Death Ship«), dati su u detaljima ii pogodan su dodatak za 
vedimu kucntih racumara. 


»KREIRANJE IGARA AVANTURA NA VASEM OREGON 32« 
(Creating Adventure Games on Your Dragon 32) 

Clive Gifford. Interface 

Pet kompletnih igrara su detaljno objasnjene, a jedna od 
njih je preneta na kasetu i disketu softvera. Tri od navedenih 
igara mogu se prilagoditi vasem racunaru bez vedih teskoda. 


»ZX81 DZEPNA KNJIGA« 

(The ZX81 Pocket Book) 

Trevor Toms. Phipps Associates 

Bez obzira sto je samo jedan odeljaik ove knjiige posveden 
ignama avantura, aiutor, u tom odeljku, do detalja razlaze, u 
sirokom spaktru, imogude pnisfrupe u pisanju programa. Mo- 
zete se odludhti na Ikupovfmu ove knjiige, pogotovu, ukoiiko je 
mozete nabav/iti uz popust. 


»KREIRANJE AVANTURA NA VASEM SPECTRUMU« 

(Creating Adventures on Your Spectrum) 

Peter Shaw / James Mortleman. Interface 

Poznajem Riitera dobro ■— clam je Izdavackog saveta caso- 
pisa »Your Spectrum«. Saima knjiga je kvalitetma, sa puno 
novih igara i sijajmom gnafiiikam. I jedna napomena: sve ilu- 
stracije u kmj'izi izradio je Riter licno. 
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»PISANJE BASIC IGARA AVANTURA ZA TRS-80« 

(Writing BASIC Adventure Games for the TRS-80) 

Frank Dacosta. Tab Books 

Ovo je li-zuzetao vodic za pisanje programa avantura. To 
je folia knjiga sa kojom sam i ja poceo i jos uvek mi je nista 
izgufoila ad svoje vrednosti. 

»NAPlSlTE SOPSTVENE PROGRAME AVANTURA ZA VA$ 
MIKRORACUNAR« 

(Write Your Own Adventure Programs for Your 
Microcomputer) 

Tyler / Howarth. Osborne 

Za nesto manje od dve funte ovo je verovatno najbolji 
naislov koj,i mozete naci na temu igara avantura. Nemojte se 
zavarati pnistupom kojii vam ise moze uciniti detinjastim, jer 
knj-iga ima dovoljno ozbiljrtih stvari da vam prenese. 


Nove knjige u izdanju NIRO »Tehnicka knjiga«, Beograd: 

ZX SPECTRUM — PROGRAMIRANJE U BASIC-u 
Mr Nenad Markovic i Dusan Davidovac 

Osnovne vrednosti ove knjiige su jasno i ipostupno lizlaga- 
nje, ilustradje ii zanimljivi i nestandardni pniimeri. Posebno su 
prikazani boj'a, grafika i igre. Autori su, vodeni svojim boga- 
tim iskustvom, pruziIi originalan pristup savladavanju teorij- 
skih i prakticnih znanja, neophodnlih za rad sa owm tipom 
racunara. Time je pastignuto da korisnik znatno prosiri mo- 
guonost primene svog racunara na razlioite probleme -iz eko- 
nomiije, tehmike i drugih oblasti koje zahtevaju obradu po- 
dataka. 

KUCNI KOMPJUTER1 — ALGORITMI I PROGRAMI 
Grupa autora 

Mladi i talentovani autori ove knjige zasluzuju veoma vi- 
soku ocenu za izbor sadrZaja i problema koj'i su u njoj 
obradeni, rtacin obrade i preciznost i aktuelnost tekstualnog i 
materijalnog dela rukopisa. 
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Ovaij tekst je znacajan doprinos stiruonoj i udzbenickoj 
literaturi koja je, kod nas, izuzetno malobrojna za oblast 
primene kucnih racunara. Posebna vrednost knjige su dodaci 
(nukovanje racunarom, pronalazenje i otklanjanje gresaka u 
prqgramu, mape osnovnih memarijskih adresa, neomik pop 
mova . . .), sto je fiiini ioteresantnom za sirok krug citalaca. 

PROGRAMIRANJE ZA POCETNIKE I—II 
Philip Crookall 

Autor, koristedi iskustva stecena u uvodenju racunara u 
skole u VeMkoj Britain!ji, izlaze materiju na jasan i pristupa- 
can nacin, tako da prva kmj'iga predstavlja sti^o koje se lako 
c-ita i dostupno je svakom pocetmiku, nezavtisno 'od uzrasta. 
Ceo sadrzaj knjige je objasnjen preko ilustrovanih primera, 
sto u vel.iikoj meri olaksava njeno koriscanje. 

U drugom delu autor obrazlaze tehniiku planiranja izrade 
programa. Ova tehnika je izlozena koniscenjem dijagrama toka, 
cije je poznavanje neopbodno da bi se citalac osposobio za 
samostalnu izradiu slozemij'ih programa. 

MINI I MIKRO RACUNARI 
Mr Branislav Duric 

Enciklopodijski pregled oblastii vezanih za racunarsku teh- 
niku predstavlja izuzetan kvaliitet ove knjige. Na preko 470 
strana autor postupmo vodi citaoca od osnova bimarne algebre 
do slozenih problema hairdvera i softvera mini li mikro ra¬ 
cunara. 
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AVANTURE 

ZA VAS 

ZX SPECTRUM 

Sati i sati u igri koja ce u potpunosti 
obuzeti vas duh 

Evo ktjuca za bezbroj svetova iz maste. Svaki pro¬ 
gram za sebe je jedinstvena predstava sa neprijateljima 
koje treba nadvladati, predelima koje treba istraziti i 
problemima koji cekaju na resenje. Strasne nemani, po- 
traga za nevidenim blagom, fino upredene cini — otkrite 
ovo i jos vise. 

Ovi programi avantura su najnoviji i najpopularniji 
oblik zabave na racunarima. Programi su tako pisani da 
cete, kada ih budete stavili u pokret na vasem ZX Spec- 
trumu, ujedno puno nauciti o pisanju sopstvenih pro- 
grama avantura. Knjiga sadrzi i detaljna objasnjenja 
kako da kreirate svoj originalni program avanture, kao i 
poglavlja uz eiju pomoc cete jos vise unaprediti svoje 
sposobnosti za pisanje programa i igru. 



